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1 . SCOPE 


This specification establishes the detailed design for a 
CPCEI identified as the IGDS/TRAP Interface Program (ITIP) . 

This software provides the capability to develop at an Inter- 
active Graphics Design System (IGDS) design station process 
flow diagrams for use by the NASA Coal Gasification Task Team. 

In addition, ITIP uses the Data Management and Retrieval System 
(DMRS) to maintain a data base from which a properly formatted 
input file to the Time-Line and Resources Analysis Program (TRAP) 
can be extracted. This set of software resides on the PDP-11/70 
in Building 4487, MSFC. 


2 . APPLICABLE DOCUMENTS 


• IGDS8 Application Software Interface Document. 

76, Rev. fc, Intergraph Corporation. November. 1980. 

e I GPS Operating Manual (IGDS8) , 79-067, Rev. B, 
Intergraph Corporation, March 1981. 

e Graphics Standard Interchange Format, 80-021, 

Intergraph Corporation, May, 1980. 

e DMRS 8.0 HOL Control Block (CB) User's Guide, 

79-031, Rev. X, Intergraph Corporation, July 1980 . 

• DMRS 8 . 0 HOL Use r 1 s Guide, 80-124, Intergraph 
Corporation, April 1980. 

e DMRS Data Definition Language (DDL) Compiler, 

Internal Report Wo. 79-0§0, Rev. b, Intergraph 
Corporation, January 1981. 

• DMRS 8 Command Language User Guide, 79-065, 
fcev. B, Intergraph Corporation, February 1981. 
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3. Requirement! 

3 1 ITIP Program Configuration 

The ITIP is a program which provides the Coal Garification 
Task Team with an efficient method for developing network flow 
diagrams. This network flow diagram consists of subprocess 
modules (nodes) interconnected by directed links (edges) . The 
ITIP provides software interfaces to the following hardware 
components: 

e IGDS Design Station - Operator interaction with ITIP. 

• PDP 11/70 - Host computer for the ITIP Software. 

e Honeywell 560 - Host computer for the TRAP Software. 

e PDP/Honeywell Interface - Communication link between 
PDP 11/70 and Honeywell 560. 

The functional relationship between the ITIP software 
components which provide the interfaces between the hardware 
described above is depicted in Figure 3.1-1. The software 
components are: 

• ITIP Software (described herein) 

• IGDS Software (Intergraph product) 

• DMRS Software (Intergraph product) 

• TRAP Software (NASA product) 

• ITIP Data base (described herein) 

The main structure of the ITIP software provides the 
following functions: 

• Executive Control 

• Initilization functions 

• User interaction 

• IGDS graphics interface 

• DMRS data base interface 

• Termination functions 


* ' 
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The modular design of the ITIP software is presented by the 
structure chart shown in Figure 3.1-2. The organization of 
the ITIP lata base is defined by the following components t 

• Project Definition Block (PDB) 

• Resource Definition Block (RDB) 

• Node Definition Block (NDB) 

• Edge Definition Block (EDB) 

• Resource Activity Block (RAB) 

3 • 2 ITIP Program Operation 

The ITIP program consists of two sets of software. One 
set of software is written in FORTRAN and is included in the 
RSX-11M Plus task ITIP. This task provides interaction with the 
ITIP data base via IGDS/DMRS attribuLe services software. The 
other set of software is written in the IGDS Command Interpreter 
syntax. The modules comprising this set of software are 
known as user commands. They are processed by the IGDS 
Command Interpreter to provide software execution of the 
graphics commands available to the interactive user of the 
IGDS system. 

The ITIP is initiated via RSX-11M PLUS Operating System 
at the request of the user. The user installs the FORTRAN 
task ITIP by request at the PDP 11/70 console device. The 
user then logs on to an IGDS design station and requests IGDS 
execution. Under IGDS control the user then requests execution 
of the ITIP executive user command. 

The ITIP executive user command controls execution of the 
ITIP software. Initialization of IGDS global registers and 
initial graphic conditions is then provided and the ITIP data 
base is attached. The executive user command then directs 
queries for user input and responses to the user commands. 

Table 3.2-1 defines the ITIP user options. The index is 
the internal index used by the software to define the user 
optic;.. The mnemonic is the two character code inpuc by the 
user to define the desired option. The ITIP executive user 
command (ITIP program) is terminated via operator command. 

Prior to termination the files are closed and IGDS conditions 
are reset to what they were prior to execution of the ITIP 
executive user command. 
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INDEX 


MNEMONIC 


OPTION 


1 

PN 

Place Node 

2 

PE 

Place Edge 

3 

DN 

Delete Node 

4 

DE 

Delete Edge 

5 

DR 

Define Resource 

6 

MR 

Modify Resource 

7 

UP 

UPdate drawing 

8 

MN 

Modify Node description 

9 

SP 

Specify Project description 

10 

MP 

Modify Project description 

11 

SF 

Submit TRAP File 

12 

ZI 

Zoom In 

13 

ZO 

Zoom Out 

14 

wc 

Redefine Window Center 

15 

DC 

Default Window Center 

16 

EX 

EXpand node 

17 

PL 

Return to Previous Level 

18 

ML 

Return to Master Level 

19 

DA 

Define resource Activity 

20 

MA 

Modify resource Activity 

21 

STOP 

Terminate ITIP 


Table 32-1 ITIP User Options 
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3.3 ITIP Computer Program Characteristics 

This section describes the software modules which comprise 
the ITIP. These software modules are divided into two classes 
depending on whether they are written in the IGDS Command 
Interpretive language or FORTRAN. The ITIP user commands are 
written in the Command Interpretive language and will be discussed 
first. The ITIP task is written in FORTRAN, and the modules 
which comprise this task will then be covered. 

3.3.1 User Commands 

The environment for the execution of the user commands has 
the following limitations: 

• Predefined set of variable names 

• Variables are global 

• Subroutines are not supported 

• Length of user command limited to 2048 characters 

The predefined set of variable names are listed in Table 3.3-1. 

The fact that these variables are global requires that some be 
reserved for local usage while others are rigidly defined for use 
throughout ITIP. The global registers are listed in Table 3.3-2. 

The registers which are not reserved for local usage must not be 
used for any purpose other than that which is specifically 
defined in Table 3.3-2. The fact that subroutines are not supported 
and the length of a user command is limited presents a problem. 

The functions required by ITIP cannot be provided in a single 
user command. This is resolved by the capability to chain user 
commands together. However, the desirability of developing the 
software in modular fashion demands the capability to treat 
some modules as subroutines of others. This is resolved by 
chaining a user command subroutine back to the command that called 
it. This is done by setting a global register to a known code 
prior to calling the subroutine. A check for that code is then 
provided at the entry point of the calling module to permit 
branching to the next statement following the call to the sub- 
routine. The global register should then be reset to prevent 
other subroutines inadvertantly returning to that location. 

This section contains a description and Hierarchical 
Input Processing Output (HIPO) for each user command depicted 
in the ITIP structure chart shown in Figure 3.1-2. The description 
of each user command consists of: 
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• Function of the user command 

• Calling sequence 

• Modules which call this user command 

• Modules called by this user command 

• IGDS commands used by this user command 

• Local usage of global registers 

Each HIPO contains the principal functions performed within 
the module. Also included with each function are a list of 
the inputs which may be required to perform the function and 
a list of the outputs whicn may be created as a result of 
performing the function. 
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Table 3.3-1. User Command Interpreter Variable Names 


Name 

Si 

ze 

Description 

R0-R31 

16 

bits 

Single-precision integer registers. 

ERR 

16 

bits 

Register where the status of each 
statement executed by the UCI is 
posted. 

NUM 

16 

bits 

Register set to the number of input 
characters for keyboard input. 

10-115 

32 

bits 

Double-precision integer registers. 

XUR,YUR, 

ZUR 

32 

bits 

Registers where the X,Y,Z UOR 
coordinates from a data point are 
stored . 

VNO 

16 

bits 

Register where the view number is 
stored. 

A0-A15 

64 

bits 

Double-precision floating point 
registers. 

KEY 

42 

characters 

Variable where the results of an 
alphanumeric keyboard input are 
stored. 

MSG 

42 

characters 

Alphanumeric working register. 
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Table 3.3-2 Global Registers 


Register 

Usage 


RO 

Error Code 


R1 

ITIP Option Index 


R2 

Return Code (Level 1) 


R3 

Return Code (Level 2) 


R4 

Return Code (Level 3) 


R5 

Not used 


R6 

Not used 


R7 

Not used 


R8 

Not used 


R9 

Not used 


RIO 

Network Level Index 


Rll 

View Orientation Index 


R12 

Zoom Index 


R13 

Next Design Space Index (Node 

Index) 

R14 

Current Design Space Index 


R15 

Previous Design Space Index 


R16 

Node Parent of Current Design 

Space 

R17 

Node Parent of Previous Design 

Space 

R18 

Reserved for Local Usage 


R19 

Reserved for Local Usage 


R20 

Reserved for Local Usage 


R21 

Reserved for Local Usage 


R22 

Reserved for Local Usage 


R23 

Reserved for Local Usage 


R24 

Reserved for Local Usage 


R25 

Reserved for Local Usage 


R26 

Reserved for Local Usage 


R27 

Reserved for Local Usage 


R28 

Reserved for Local Usage 


R29 

Reserved for Local Usage 


R30 

Reserved for Local Usage 


R31 

User Command Communication 


11 

Reserved for Local Usage 


12 

Reserved for Local Usage 


13 

Reserved for Local Usage 


14 

Reserved for Local Usage 


15 

Reserved for Local Usage 


16 

Reserved for Local Usage 


17 

Reserved for Local Usage 


18 

Reserved for Local Usage 


19 

Reserved for Local Usage 


no 

Reserved for Local Usage 


111 

X-Coordinate of Design Space 


112 

Y-Coordinate of Design Space 


113 

User Command Communication 


114 

User Command Communication 


115 

Not Used 



11 


3. 3. 1.1 Executive Module (ITIP) 

The purpose of this module is to provide the overall 
control for the ITIP operation. This module calls module INIT 
to perform initialization functions, module IPRM to prompt 
the user for input, module IRES to direct the responses to 
the user input, and ITRM to provide ITIP termination functions. 

Calling sequences UCM ’QS2: l 50 , 2 ] ITIP. UCM' 

Modules which call ITIP: 

None 

Modules called by ITIP: 

INIT. UCM 
IPRM. UCM 
I RES. UCM 
ITRM. UCM 

IGDS commands used by ITIP: 

None 

Local registers used by ITIP: 

None 
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INPUT 


RO 


STEP PROCESSING STEP OUTPUT 



ITIP HIPO 

Clear message fields. 

Set level one return code and 
error code. 

Call a module (INIT) to initialize 
ITIP variables, IGDS conditions and 
DMRS data base. 

If error condition go to step 10. 
Else continue 

Set level one return code, option 
index and error code. 

Call a module (IPRM) to prompt 
user for option. 

If terminate option selected go to 
step 10. Else continue. 

Set level one return and clear 
level two return. 

Call a module (IRES) to direct 
response to user option and go to 
step 6. 

Set level one return. 

Call a module (ITRM) to perform 
termination functions. 

Display "ITIP TERMINATED" in status 
field and stop. 


2 

3 

4 

10/5 

6 

7 

10/8 

9 

6 

11 

12 

E 


RO, R2 


R2, Rl, 


R2, R3 


R2 


RO 
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3. 3.1.2 Initialization Module (INIT) 

The functions of this module are to attach to the DMRS 
data base, to provide initial values for ITIP global registers, 
and to set IGDS initial conditions. 

Calling sequences UCM 'QS2 : ( 50 , 2 ] INIT. UCM ' 

Modules which call INIT: 

ITIP. UCM 

Modules called by INIT: 

ITIP . TSK 

IGDS commands used by INIT: 

SNAPLK 

GGLOCK 

D0UBL1 

UPDBTH 

TJST7 

TXTNLK 

Local registers used by INIT: 

11 - X-coordinate 

12 - Y-coordinate 
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INPUT 


CONTRL 


KEY 


111 , 112 


CONTRL 


STEP PROCESSING 

INIT HIPO 

1 Inhibit command and prompt messages 

2 Execute IGDS commands SNAPLK and 
GGLOCK to turn on snap lock and 
graphic group locks respectively. 

3 Retrieve cell library and select 
arrowhead as line terminator. 

4 Initialize design space parameters. 


5 Set data bast, option code and sub- 
code and call FORTRAN task ITIP 

to retrieve design space index. If 
no error is returned go to step 7. 
Else continue. 

6 Initialize design space index, data 
base subcode, call FORTRAN task 
ITIP to store design space index, 
and go to step 8. 



Set design space index to value 
returned by ITIP task. 

Initialize design space and node 
parent indices. 

Set window origin to master level 
design space. 


10 Execute IGDS command DOUBL1 twice 
to zoom out the reference screen 
(left hand) and execute IGDS 
command UPDBTH to update both 
screens to display master level. 


Define character height and width 
and line length and spacing. 


12 Execute IGDS commands TJST7 to set 
text justification to center text 
and TXTNLK to turn test node lock on. 


13 Enable command and prompt messages 
and return to ITIP user command. 


STEP OUTPUT 

2 CONTRL 

3 

4 

111 , 112 , 
RIO, RU, 
R12 

7/6 R20, R21 , 

ERR 

8 R13, R20 

8 R13 

9 R14, R15 , 
R16 , R17 

10 II, 12 

11 

12 

13 

R CONTRL 
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3. 3. 1.3 Terminal Interface Module (IPRM) 

The function of this module is to prompt the user for the 
I TIP option which is to be executed. 

Calling sequences UCM ' QS2 : ^50,2jlPRM.UCM' 

Modules which call IPRM: 

ITIP.UCM 

Modules called by IPRM: 

None 

IGDS commands used by IPRM: 

None 

Local registers used by IPRM* 

None 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


KEY 


IPRM HIPO 

1 Display Command and prompt 2 
messages. 

2 Get user input. If key- 4/3 KEY 

board entry go to step 4. 

Else continue. 

3 Display message indicating 1 
invalid response and go to 
Step 1. 

4 Test keyboard entry for 6/5 
valid user option. If 

valid go to step 6* Else 
continue. 

5 Display message indicating 1 
invalid mnemonic and go 

to step 1. 

6 Set option index to 7 Rl 

reflect user option 

selected . 

7 Return to ITIP user R 

command . 












3. 3. 1.4 Response Direction Nodule (IRES) 

The function of this module is to direct 
specific user command which provides the IGDS 
of the user selected IT1P option. 

Calling sequence: UCM ' QS2: [ 50, 2 ] IRES. UCM ' 

Modules which call IRESt 

ITIP.UCM 

Modules called by IRES: 

IPND.UCM 
IPED.UCM 
IDND.UCM 
IDED.UCM 
IDRS .UCM 
IMRS . UCM 
IMND.UCM 
ISPD.UCM 
IMPD.UCM 
I EXT. UCM 
ISTF.UCM 
IZMI.UCM 
IZMO.UCM 
ISWC.UCM 
IDWC.UCM 
I EXP. UCM 
IRPL.UCM 
IRML.UCM 
IDRA.UCM 
IMRA.UCM 

IGDS commands used by IRES: 

DOUBLl 

UPDBTH 

Local registers used by J^ES: 

None 


conti ol to the 

end OMRS capabilities 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 

R1 

1 

IRES HIPO 

If option index is not 
valid go to stop 22. 
Else continue. 

22/2 


Rl 

2 

If option index is 1, set 
second level return, 
reset third level return, 
and call a module (IPND) 
to place nodes. Go to 
step 23. 

23 

R3, R4 

R1 

3 

If option index is 2, set 
second level return, 
reset third level return, 
and call a module (1PED) 
to place edges. Go to 
step 23. 

23 

R3, R4 

R1 

4 

If option index is 3, set 
second level return, 
reset third level return, 
and call a module (IDND) 
to delete nodes. Go to 
step 23. 

23 

• 

R3 , R4 

R1 

5 

If option index is 4, set 
se.jnd level return and 
call a module (IDED) to 
delete edges. Go to 
step 2?. 

23 

R3 

Rl 

6 

If option index is 5, set 
second level return and 
call a module (IDRS) to 
define a network resource. 
Go to step 23. 

23 

R3 

R1 

7 

If option index is 6, set 
second level return and 
call a module (IMRS) to 
modify a network resource 
-to, ,t.Q a tap- 23, 

23 

R3 








INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


Ri 

8 

IRES HIPO - Continued 

If option index is 7, 
execute IGDS command 
UPDBTH to update both 
screens and go to step 23. 

23 


R1 

9 

If option index is 8, set 
second level return, reset 
third level return, and 
call a module (IMND) to 
modify the NDB. Go to 
step 23. 

23 

R3, R4 

Rl 

10 

If option index is 9, set 
second level return and 
call a module (ISPD) to 
specify the PDB. Go to 
step 23. 

23 

R3 

Rl 

11 

If option index is 10, set 
second level return and 
call a module (IMPD) to 
modify the PDB. Go to 
step 23. 

23 

• 

R3 

Rl 

12 

If option index is 11, set 
second level return, call 
a module (IEXT) to extract 
TRAP formatted input file, 
and call a module (ISTF) 
to submit TRAP file to 
Honeywell. Go to step 23. 

23 

R3 

Rl 

13 

If option index is 12, set 
second level return and 
call a module (IZMI) to 
zoom in right-hand screen. 
Go to step 23. 

23 

R3 

Rl 

14 

If option index is 13, set 
second level return and 
call a module (IZMO) to 
zoom out right-hand screen 
Go to step 23. 

23 

R3 


20 







INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IRES HIPO - Continued 



R1 

15 

If option index is 14, set 
second level return and 
call a module (ISWC) to 
redefine the window center 
Go to step 23. 

23 

R3 

Rl 

16 

If option index is 15, set 
second level return and 
call a module (IDWC) to 
set default window center. 
Go to step 23. 

23 

R3 

Rl 

17 

If option index is 16, set 
second level return, reset 
third level return, and 
call a module (IEXP) to 
expand a node. Go to 
step 23. 

23 

R3 , R4 

Rl 

18 

If option index is 17, 
set second level return 
and call a module (IRPL) 
to return to previous 
level design space. 

Go to step 23. 

23 

R3 

Rl 

19 

If option index is 18, set 
second level return and 
call a module (IRML) to 
return to master level 
design space. Go to 
step 23. 

23 

R3 

Rl 

20 

If option index is 19, set 
second level return, reset 
third level return, and 
call a module (IDRA) to 
define a RAB. Go to 
step 23. 

23 

R3 , R4 

Rl 

21 

If option index is 20, set 

second level return, reset 
third level return, and 

23 

R3, R4 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IRES HIPO - Continued 

21 call a module (IMRA) to 
modify a RAB. Go to step 
23. 

22 Display message indicating 23 RO 

option index error and 

set error index. 

23 Return to ITIP user R 

command . 










3. 3. 1.5 Termination Module (ITRM) 

The function of this module is to reset the IGDS conditions 
to what they were prior to the execution of the INIT module. 

Calling sequence: UCM 'QS2: (50,2 ] ITRM. UCM* 

Modules which call ITRM: 

1TIP.UCM 

ITIP.TSK 

Modules called by ITRM: 

None 

IGDS commands used by ITRM: 

SNAPLK 

GGLOCK 

TXTNLK 

HALF1 

Local registers used by ITRM : 

R20 


23 


INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 



ITRM HIPO 

Execute IGDS commands 
SNAPLK , GGLOCK , and 
TXTNLK to turn on the 
snap, graphic group, 
and text node leeks, 
respectively. 

Execute the IGDS command 
HALF1 twice to restore 
the left-hand screen. 

Set data base option code 
and call FORTRAN task 
ITIP to store current 
design space index. 

Return to ITIP user 
command . 
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R 
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3. 3. 1.6 Place Node Module (IPND) 

The function of this module is to prompt the user for the 
center of a node and place an ellipse at that point. The module 
also prompts for a node description and displays this text in the 
ellipse. A module ISND is called to prompt for shift factor 
and node duration and to enter these and other entries in the 
Node Definition Block (NDB) of the ITIP Data Base. The graphic 
element (ellipse ) , text and data base entries constitute placement 
of a node. 

Calling sequences UCM 'QS2: (50,2 JIPND.UCM' 

Modules which call IPND: 

I RES. UCM 

Modules which IPND calls: 

ITIP . TSK 
ISND. UCM 

IGDS commands used by IPND: 

PELL1 

PTEXTN 

PTEXT 

Local registers used by IPND: 

R20 - Data base option code 

R21 - Data base subcode 

R29 ~ Character count 

11 - Ellipse X-cooxd. 

12 - Ellipse Y-coord. 

13 - Ellipse X-coord. 

14 - Ellipse Y-coord. 
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INPUT 

STEP 

CONTRL 

1 


2 


3 

XUR, YUR 

4 

XUR, YUR, 
11, 12, 13, 
14 

5 

R13 

6 

XUR, YUR 

7 


8 


9 

NUM, KEY 

10 


11 

NUM 

12 

MSG, KEY 

13 

R29, NUM, 
KEY 

14 


PROCESSING 

STEP 

OUTPUT 

IPND HIPO 



Display command and prompt messages 
and disable message fields. 

2 

CONTRL 

Get user input. If data button go 
to step 4. If reset button go to 
step 20. Else continue. 

4/20/3 

XUR, YUR 

Display message indicating invalid 
response and to to step 1. 

1 


Display message indicating point 
selected and calculate the 
coordinate of ellipse. 

5 

11, 12, 
13, 14 

Execute IGDS Command PELL1 to draw 
ellipse . 

6 


Set text node index . 

7 

R30 

Execute IGDS command PTEXTN to 
place text node. 

8 


Execute IGDS command PTEXT to 
place text in node. 

9 


Display prompt message and get 
first line of node description. 

10 

KEY, NUM 

Save number of characters in line, 
send line to text node, insert 

blank, and save line. 

11 

MSG, R29 

Display prompt message and get 
second line of node description. 

12 

KEY, NUM 

If second line is blank, go to 
step 14. Else continue. 

13 


Append second line to first line to 
complete node description. 

14 

MSG 

Update character count, insert line 
feed in second line and send line 
to text node. 

15 

R29, KEY 
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INPUT STEP 


PROCESSING 


STEP OUTPUT 


R13 


RO 


CONTRL 


IPND HIPO - Continued 

15 Enable return and call ISND user 16 R4 

command to store description in data 

base and get remaining node 
description variables. 

16 Increment design space index , store 17 R13, KEY, 

in KEY buffer, and calculate number NUM 

of characters in node index. 

17 Set data base option code and sub- 18 R20, R21 

code and call FORTRAN task ITIP . 

18 If ITIP does not return an error 1/19 
code, go to step 1. Else continue. 

19 Display error message . 20 

20 Enable message fields and return R CONTRL 

to IRES user command. 
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3. 3. 1.7 Place Edge Module (IPED) 

The function of this module is to prompt the user to 
identify the predecessor and successor nodes of an edge. The 
graphic element (line with arrowhead) is displayed and the 
node ID's are entered in the Edge Definition Block (EDB) 
of the ITIP Data Base. 

Calling sequence: UCM 'QS2 : [50,2] IPED.UCM' 

Modules which call IPED: 

I RES. UCM 

Modules called by IPED: 

IRNI.UCM 

IGDS commands used by IPED: 

LOCELE 

ATCPTO 

PLINE 

PTERM 

Local Registers used by IPED: 

R20 - Loop counter 
R27 - Predecessor node index 
R28 - Successor node index 
R30 - Element type 

13 - X Coordinate 

14 - Y Coordinate 
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INPUT ISTEP 


CONTRL 


UELETY 


PROCESSING 



IPED HIPO 


step! output 


Display command and prompt messages 2 
and disable message fields. 


Execute IGDS command LOCELE and 
get data point to locate 
predecessor node. If data button 
to to step 4. If reset button go 
to step 22. Else continue. 

Display message indicating invalid 
response an'* go to step 1. 

Get element type from TCB. If it i 
an ellipse go to step 6. Else 
continue. 


CONTRL 


/22/3 XUR, YUR 


XUR, YUR 


Display message indicating that a 
node was not selected and go to 
step 2. 

Display message indicating 
predecessor node selected and save 
coordinates. Display prompt 
message for successor node. 

Reset element type in TCB, execute 
IGDS command LOCELE and get data 
point to locate successor node. 

If data button go to step 9. If 
reset button go to step 22. Else 
continue . 


II, 12 


9/22/8 UELETY, XUR 
YUR 


Get element type from TCB. If it is 10/9 
an ellipse go to step 10. Else 
continue . 


XUR, YUR 


Display message indicating that a 7 
node was not selected and go to 
step 7. 

Display message indicating successor 11 
node selected and save coordinates. 


13, 14 


, 12 


Enable return, restore XUR, YUR 
coordinates of predecessor node, 
save calling routine name and call 
TRNI user command to retrieve node 


R4 , XUR, 
YUR, UCASC 
R31 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IPED HIPO - Continued 



r 31 
0 

12 

Save predecessor node index, enable 
return, restore XUR, YUR coordinates 
of successor node, and call IRNI 
user command to retrieve node index. 

13 

R27, R4 , 
xyR, YUR, 
R31 

R31 

13 

Save successor node index and reset 
return register. 

14 

R28, R4 

R27, R28 

14 

Enter predecessor and successor node 
indices in data base prototype. 

15 


Up 12, 
13, 14 

15 

Execute IGDS command PLINE to 
place line between predecessor node 
and successor node. 

16 


13, 14 

16 

Execute IGDS command PTERM to 
place arrowhead terminator at 
successor end of line to complete 
edge graphic element. 

17 



17 

Execute IGDS command ATCPTO to 
attach prototype data base entries 
to edge graphic element. 

18 


11, 12, 
13, 14 

18 

Calculate mid point of line, point 
to line and set loop counter. 

19 

11, 12, R20 

R20, 

UELETY 

19 

Loop checking on element type. If 
element is a line go to step 20. 

If line not found go to step 21. 

20/21 



20 

Issue accept point, reset and go 
to step 1. 

1 



21 

Display message indicating error 
attaching prototype and set 
error code. 

22 

R0 

CONTRL 

22 

Enable message fields and return to 
IRES user command. 

R 

CONTRL 
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3. 3.1.8 Delete Node Module (IDND) 

The function of this module is to permit the user to 
identify a node to be deleted. The graphic element (ellipse) 
and text are marked for deletion and the linkage to the 
Node Definition Block (NDB) of the ITXP Data Base deleted. 

Calling sequence: UCM 'QS2: [50,2] IDND. UCM' 

Modules which call IDND: 

I RES. UCM 

Modules called by IDND: 

IRNI.UCM 

IGDS Commands used by IDND: 

DLELEM 

Local registers used by IDND: 

R30 - Element type 

11 - X Coordinate 

12 - Y Coordinate 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IDND HIPO 


CONTRL 1 Display command and prompt 2 

messages and disable 
message fields and 
continue. 

2 Execute IGDS command 3 

LOCELE and continue. 

3 Get data point to locate 5/11/4 
node. If data button go 

to step 5. If reset 
button go to step 11. 

Else continue. 

4 Display message indicating 1 
invalid response and go 

to step 1. 

UELETY 5 Get element type from TCB. 7/6 

If it is not on ellipse gc 
to step 7. Else continue. 

XUR, YUR 6 Display message indicating 8 

node selected and save 
coordinates. Go to 
step 8. 

7 Display message indicating 1 

node not selected and go 
to step 1. 

II, 12 8 Save calling routine name, 9 

set return code, restore 
XUR, YUR coordinates of 
node, and call IRNI user 
command to retrieve node 
index. 

R31 9 If error returned from 1/10 

IRNI, display message 
indicating error and go tc 
step 1. Else continue. 


CONTRL 
XUR, YUR 

R30 

II, 12 

XUR, YUR, R4 , 
UCASC, R31, 
113, 114 








INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IDND HIPO (Continued) 



113, 114 

10 

Execute IGDS Command 
DLELEM, issue accept 
point for text node and 
ellipse then go to step 3. 

3 


CoNTRL 

11 

Enable message fields and 
return to response 
director. 

R 

CONTRL 









3. 3. 1.9 Delete Edge Module (IDED) 

The function of this module is to permit the user to 
identify an edge to be deleted. The graphic element (line with 
arrowhead) is marked for deletion and the linkage to the Edge 
Description Block (EDB) of the ITIP Data Base deleted. 

Calling sequence: UCM 'QS2 : [50,2] IDED.UCM' 

Modules which call IDED: 

I RES. UCM 

Modules called by IDED: 

None 

IGDS Commands used by IDED: 

DLELEM 

Local registers used by IDED: 

R30 - Element type 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CONTRL 


UELETY 


CONTRL 



IDED HIPO 



Display command and prompt 
messages, disable 
message fields and 
continue. 

2 

CONTRL 

Execute IGDS command 
DLELEM and get data point 
to locate edge. If data 
button go to step 4. If 
reset button go to step 8. 
Else Continue. 

4/8/3 

XUR, YUR 

Display message indicating 
invalid response and go 
to Step 1. 

1 


Get element type from 
TCB . If it is either a 
line or a group, go to 
step 5. Else go to 
step 6. 

5/6 

R30 

. XUR, YUR 

Display a message that 
edge selected and go 
to step 7. 

7 


Display message indicating 
that edge not selected 
and go to step 1. 

1 


Issue accept point, reset 
and go to step 1 . 

1 


Enable message fields and 
return to response 
director. 

R 

CONTRL 
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3.3.1.10 Define Resource Module (IDRS) 

The function of this module is to permit the user to 
specify values for the entries in the Resource Definition Block 
(RDB) of the ITIP Data Base. 

Calling sequence: UCM 'QS2: [50,2] IDRS.UCM' 

Modules which call IDRS: 

I RES. UCM 

Modules called by IDRS: 

ITIP.TSK 

IGDS commands used by IDRS: 

None 

Local registers used by IDRS: 

R20 - Data base option code 
R21 - Data base sub code 
R22 - Data base variable 
R23 - Data base variable 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CONTRL 


NUM 

KEY, NUM 
KEY, NUM 


1 

2 

3 

4 

5 

6 



IDRS HIPO 




Display command message, 
clear status and error 
fields, and disable 
message fields. 

2 

CONTRL 

Display prompt for 
resource ID and get user 
input. If keyboard entry 
go to step 4. If reset 
button go to step 27. 

Else continue. 

4/27/2 

KEY, 

NUM 

Display message indicating 
invalid response and go 
to step 2. 

2 



If number of characters 
input exceeds 2, display 
message indicating invalid 
response and go to step 2. 
Else continue. 

2/5 

• 


Save resource ID and 
number of characters. 

6 

MSG, 

R22 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to 
check for use of resource 
ID. If no error is 
returned go to step 8. 
Else continue. 

8/7 

R20, 

ERR 

R21, 

Display message indicating 
a resource with this ID 
has already been defined 
and go to step 2. 

2 



Set data base option code 
and subcode and call 
FORTRAN task ITIP to check 
for available RDB . If no 

10/9 

R20, 

R21, ERR 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




IDRS HIPO (CONTINUED) 




8 

error is returned go to 
step 10. Else continue. 




9 

Display message indicating 
that all RDB's are in use 
and go to step 27. 

27 



10 

Display prompt for resourc< 
and get input. If keyboarc 
entry, go to step 12. If 
reset button go to step 27, 
Else continue. 

12/27/1 

KEY, NUM 


11 

Display message indicating 
invalid response and go to 
step 10. 

10 


KEY , NUM 

12 

Save resource description 
and number of characters. 

13 

. UCASC, R23 


13 

Display prompt for 
constraint level and get 
input. If keyboard input 
to go step 15. If reset 
button go to step 27. 

Else continue. 

15/27/14 

KEY , NUM 


14 

Display message indicating 
invalid response and go 
to step 13. 

13 


KEY , ERR 

15 

Save constraint level and 
check validity. If 
invalid go to step 14. 
Else continue. 

14/16 

AO 


16 

Display prompt for initial 
quantity of resource and 
get input. If keyboard 
input go to step 18. If 
reset button go to step 27. 
Else continue. 

18/27/17 

KEY, NUM 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IDRS HIPO - Continued 





17 

Display message indicating 
invalid response and go 
to step 16. 

16 



KEY, ERR 

18 

Save initial quantity and 
check validity. If in- 
valid go to step 17. Else 
continue. 

17/19 

Al 


MSG, R22, 
UCASC, R23, 
AO, A1 

19 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store input values 
in RDB. 

20 

R21 



20 

Display prompt for resourc 
flags and get input. If 
keyboard input go to 
step 22. If reset button 
go to 27. Else continue. 

» 22/27/21 

KEY, 

NUM 


21 

Display message indicating 
invalid response and go 
to step 20. 

20 



KEY, ERR 

22 

Save resource flag and 
check validity. If 
invalid go to step 21. 
Else continue. 

21/23 

R22 



23 

Display prompt for 
resource function and get 
input. If keyboard input 
go to step 25. If reset 
button go to step 27. 

Else continue. 

25/27/24 

KEY, 

NUM 


24 

Display message indicating 
invalid response and go 
to step 23. 

23 



KEY, ERR 

25 

J 

Save resource function and 
check validity. If invalid 
go to step 24. Else contis 

24/26 

LUSj 

R23 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IDRS HIPO - Continued 



R22, R23 

26 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store input values 
in RDB. 

27 

R21 

CONTRL 

27 

Enable command and prompt 
messages and return to 
ITIP user command. 

R 

CONTRL 
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3.3.1.11 Specify Node Description Module (ISND) 

The function of this module is to permit the user to specify 
values for the entries in the Node Definition Block (NDB) of the 
ITIP Data Base. 

Calling sequence; UCM 'QS2 : 150,2] ISND.UCM' 

Modules which call ISND: 

IPND.UCM 

Modules called by ISND: 

ITIP.TSK 

IGDS commands used by ISND: 

ATCPTD 

Local registers used by ISND: 

R20 - Loop counter 
R30 - Element type 


INPUT STEP 


PROCESSING 


STEP OUTPUT 


NUM, 

R13 

NUM, 

KEY 

KEY 

ERR 

RIO, 

XUR, 




ISND HIPO 




1 

Define node prototype and display 
command message. 

2 


MSG, 

2 

Enter node description and node 
index in data base prototype. 

3 



3 

Display prompt for shift factor and 
get user input. If keyboard entry 
go to step 6. If reset button go 
to step 5. Else continue. 

6/5/4 

KEY 


4 

Display message indicating invalid 
response and go to step 3. 

3 



5 

Set shift factor to default value. 

6 

KEY 

KEY 

6 

Check for valid shift factor. If 
invalid display message and go to 
step 2. Else continue. 

3/7 



7 

Enter shift factor in data base 
prototype. 

8 



8 

Display prompt for node duration and 
get user input. If reset button go 
to step 10. If keyboard entry go 
to step 11. Else continue. 

10/11/9 

KEY 


9 

Display message indicating invalid 
response and go to step 8. 

8 



10 

Set node duration to default value. 

11 



11 

Set ERR register and enter node 
duration in data base prototype. 

12 

ERR 


12 

If error returned display message 
and go to step 8. Else continue. 

8/13 


R16 , 
YUR 

13 

Enter network level, node parent, 
and coordinates of node center in 
data base prototype. 

14 



14 

Display command message and set 
loop counter. 

15 

R20 
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INPUT STEP 


PROCESSING 


STEP 0 


R20, 13, 
14, 

UELETY 


13, 14 


ISND HIPO - Continued 


15 


16 

17 


Loop executing IGDS command ATCPTC 
to attach prototype data base 
entries to graphic element. If 
ellipse (node) cannot be found go 
to step 17. Else continue. 


17/16 


Issue accept point. 17 

Clear command and prompt messages R 
and return to IPND user command. 


R30 


3 








3.3.1.12 Specify Project Description Module (ISPD) 

The function of this module is to permit the user to 
specify values for the entries in the Project Definition 
Block (PDB) of the ITIP Data Base. 

Calling sequence: UCM 'QS2: [50,2] ISPD.UCM' 

Modules which call ISPD: 

I RES. UCM 

Modules called by ISPD: 

ITIP.TSK 

IGDS Commands Used by ISPD: 

None 

Local registers u CT ed by ISPD: 

R20 - Data base option code 
R21 - Data base subcode 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




ISPD HIPO 



CONTRL 

1 

Display command message, 
clear status and error 
fields, and disable 
message fields. 

2 

CONTRL 


2 

Display prompt for project 
title and get user input. 
If keyboard entry go to 
step 4. If reset button 
go to step 7. Else 
continue. 

4/7/3 

KEY, NUM 


3 

Display message indicating 
invalid response and go 
to step 2. 

2 



4 

Set data base option code 
and subcode. 

5 

R20 , R21 

NUM 

5 

If number of characters 
exceeds 30, set limit to 
30. 

6 

NUM 

R20 , R21 , 
NUM, KEY 

6 

Call FORTRAN task ITIP 
to store project title 
in PDB. 

7 



7 

Display prompt for net- 
work ID and get user in- 
put. If keyboard input 
go to step 9. If reset 
button go to step 11. 
Else continue. 

9/11/8 

KEY, NUM 


8 

Display message indi- 
cating invalid response 
and go to step 7. 

7 



NUM 


9 


If number of characters 
in network ID exceeds 
4, set limit to 4. 


10 


NUM 




INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



ISPD HIPO - Cont. 



NUM, KEY 

10 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store network ID 
in PDB. 

11 

R21 


11 

Display prompt for net- 
work title and get user 
input. If keyboard input 
go to step 13. If reset 
button go to step 15. 

Else continue. 

13/15/12 

KEY, NUM 


12 

Display message indicating 
invalid response and go to 
step 11. 

11 


NUM 

13 

If number of characters in 
network title exceeds 30, 
set limit to 30. 

14 

NUM 

NUM, KEY 

14 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store network 
title in PDB. 

15 



15 

Display prompt for start 
time and get user input. 
If keyboard input go to 
step 17. If reset button 
go to step 19. Else 
continue. 

17/19/16 

KEY, NUM 


16 

Display message indicating 
invalid response and go 
to step 15. 

15 


KEY 

17 

Save start time and check 
validity. If invalid go 
to step 16. Else continue 

16/18 

AO, ERR 
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INPUT 


STEP 


PROCESSING 


NUM, KEY , AO 1 18 


NUM, KEY 


ISPD HIPO - Continued 
Set data base option sub- 
code and call FORTRAN 
task ITIP to store start 
time in PDB. 

Display prompt for units 
of time and get user in- 
put. If keyboard input 
go to step 21. If reset 
button go to step 23. 

Else continue. 

Display message indicati 
invalid response and go t 
step 19. 

If number of characters 
in units of time exceeds 
8, set limit to 8. 

Set data base option 
subcode and call FORTRAN 
task ITIP to store units 
of time in PDB. 

Display prompt for net- 
work duration and get 
user input. If keyboard 
input go to step 25. If 
reset button go to step 
27. Else continue. 

Display message indicat- 
ing invalid response and 
go to step 23. 

Save network duration an 
check validity. If 
invalid go to step 24. 
Else continue. 


21/23/20 KEY , NUM 


25/27/24 


KEY, NUM 


24/26 


AO, ERR 


KEY, NUM, AO 26 


Set data base option 
subcode and call FORTRAN 
task ITIP to store net- 
work duration in PDB. 
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INFUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CONTRL 


ISPD HIPO - Continued 

27 Enable command and prompt R 
messages and return to 
IRES user command. 


CONTRL 


8 








3.3.1*13 Modify Resource Module (IMRS) 

The function of this module is to permit the user to modify 
the values of entries in the Resource Definition Block (RDB) of 
the ITIP Data BAse. 

Calling sequence: UCM ' QS2: [50,2] IMRS. UCM' 

Modules which call IMRS; 

I RES. UCM 

Modules called by IMRS: 

ITIP.TSK 

IGDS Commands used by IMRS: 

None 


Local registers used by IMRS: 


R20 

R21 

R22 

R23 

R24 


Data base option code 
Data base subcode 
Data base variable 
Data base variable 
Data base variable 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMRS HIPO 



CONTRA 

1 

Display command message , 
clear status and error 
fields, and disable 
message fields. 

2 

CONTRL 


2 

Display prompt for 
resource ID and get user 
input. If keyboard 
input go to step 4. If 
reset button go to step 
31. Else continue. 

4/31/3 

KEY, NUM 


3 

Display message indicating 
invalid response and go 
to step 2. 

2 


NUM 

4 

If number of characters 
input exceeds 2 , then go 
to step 3. Else continue. 

3/5 


NUM, KEY 

5 

Set data base option code 
and subcodes and call 
FORTRAN task ITIP to 
check for resource ID in 
RDB. If valid resource 
ID go to step 7. Else 
continue. 

7/6 

R20, R21 , 
R24 


6 

Display message indicating 
resource ID not found and 
go to step 31. 

31 



7 

Set data base option sub- 
codes and call FORTRAN 
task ITIP to get resource 
description from RDB. 

8 

R21, R22, KEY 

KEY 

8 

Display resource 
description in status 
field and get input. If 
keyboard input go to step 
10. If reset button go 
to step 11. Else continue 

10/11/8 

KEY, NUM 


50 


PROCESSING 


OUTPUT 



KEY, NUM 


IMRS HIPO - CONT. 

Display message indicat- 
ing invalid response anc 
go to step 7, 

Set data base cpcion 
subcode and call FORTRAN 
task ITIP to store 
resource description in 
RDB. 


14/15/13 


Set data base option 
subcodes and call 
FORTRAN task ITIP to get 
resource constraint 
from RDB. 

Display resource 
constraint in status 
field and get input. If 
keyboard input go to 
step 14. If reset 
button go to step 15. 
Else continue. 

Display message indicat- 
ing invalid response 
and go to step 11. 


Save resource constraint 13/15 
and check validity. If 
invalid go to step 13. 

Else continue. 


KEY, NUM 


Al, ERR 


KEY, NUM 


Set data base option 
subcode and call FORTRAN 
task ITIP to store 
resource constraint in 
RDB. 


Set data base option sub 
codes and call FORTRAN 
task ITIP to get 
Resource initial quantit 
from RDB. 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMRS HIPO - CONT. 




KEY 

17 

Display resource initial 
quantity in status field 
and get input. If key- 
board input go to step 19 
If reset button go to 
step 20. Else continue. 

19/20/18 

KEY, 

NUM 


18 

Display message indicatin< 
invalid response and go 
to step 16. 

16 



KEY 

19 

Save resource initial 
quantity and check 
validity. If invalid go 
to step 18. Else 
continue . 

18/20 

Al, 

ERR 

KEY , NUM 

20 

Set data base option 
subcode and call FORTRAN 
task ITIP to store 
resource initial quantity 
in RDB. 

21 

• 

Rl 



21 

Set data base option 
subcodes and call FORTRAN 
task ITIP to get 
resource flags from RDB. 

22 

R21 , 
KEY 

R22, 

KEY 

22 

Display resource flags in 
status field and get in- 
put. If keyboard input 
go to step 24. If reset 
button go to step 25. 

Else continue. 

24/25/23 

KEY, 

NUM 


23 

Display message indicat- 
ing invalid response and 
go to step 21. 

21 



KEY 

24 

Save resource flags and 
check validity. If 
invalid go to step 23. 
Else continue. 

23/25 

R24, 

ERR 


52 






INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




IMRS HIPO - CONT. 



KEY, NUM 

25 

Set data base option sub- 
code and call FORTRAN 
task ITIP to store 
resource flags in RDB . 

26 

R21 


26 

Set data base option sub- 
codes and call FORTRAN 
task ITIP to get resource 
function from RDB. 

27 

R21, R22 
KEY 

KEY 

27 

Display resource function 
in status field and get 
input. If keyboard input 
go to step 29. If reset 
button go to step 31. 

Else continue. 

29/31/28 

KEY, NUM 


28 

Display message indicat- 
ing invalid response and 
go to step 26. 

26 

• 

KEY 

29 

Save resource function 
and check validity. If 
invalid go to step 28. 
Else continue. 

28/30 

R23 , ERR 

KEY, NUM 

30 

Set data base option sub- 
code and call FORTRAN tasl 
ITIP to store resource 
function in RDB. 

31 

R21 

CONTRL 

31 

Enable command and 
prompc messages and 
return to IRES user 
command . 

R 

CONTRL 
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3.3.1.14 Modify Node Description Module (IMND) 

The function of this module is to permit the user to 
modify the values of entries in the Node Definition Block 
(NDB) of the ITIP Data Base. 

Calling sequence: UCM ' QS2 : [50,2] IMND. UCM' 

Modules which call IMND: 

I RES. UCM 

Modules called by IMND: 

IRNI .UCM 
ITIP.TSK 

IGDS commands used by IMND: 

REVPTO 

DLELEM 

PTEXTN 

PTEXT 

ATCPTO 

DEFPTO 

Local registers used by IMND: 

R30 - Element type 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




IMND HIPO 



CONTRL 

1 

Clear error and status 
fields and disable 
command and prompt 
messages . 

2 

CONTRL 


2 

Define review table for 
NDB and reset element 
type in TCB. 

3 

UELETY ! 

I 

! 

i 


3 

Display command and 
prompt messages. 

4 



4 

Execute IGDS command 
DEFPTO to define data 
base prototype ~nd get 
input. If data button 
go to step 6. if reset 
button go to step 35. 
Else continue. 

6/35/5 

XUR, YUR 


5 

Display message indicat- 
ing invalid response and 
go to step 3. 

3 


UELETY 

6 

Get element type from TCB. 
If it is an ellipse go to 
step 8. Else continue. 

8/7 



7 

Display message indicat- 
ing data for prototype 
not found and go to 
step 3. 

3 



8 

Execute IGDS command 
REVPTO to display NDB 
review table. 

9 



9 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to 
retrieve NDB parameters. 

10 

R20 , R21 










INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMND HIPO - CONT. 




10 

Display CURRENT ATTRIBUTE 
VALUES in status field 
and clear error field. 

11 



11 

Enable return, save 
calling routine name, 
and call a module (IRNI) 
to retrieve node index 
and coordinates of 
center. 

12 

R4, UCASC 
K31, 113, 
114 

R31 

12 

Test node index. If 
valid go to step 14. 
Else continue. 

14/13 



13 

Display message 
indicating that IRNI 
did not find node and go 
to step 35. 

35 



14 

Display prompt message 
and get first line of 
node description. If 
reset button go to step 
26. Else continue. 

26/15* 

KEY, NUM 

KEY, NUM 

15 

Set loop counter, save 
first line and save 
number of characters in 
first line. 

16 

R28 , MSG, 
R29 

113, 114 

R28, 

UELETY 

16 

Execute IGDS command 
DLELEM to delete text 
node. Loop checking 
element type for text 
node. If text node 
found go to step 18. 
Else continue. 

18/17 

R28 


17 

Display message indicat- 
ing text node not found 
and go to step 35. 

35 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




IMND HIPO - CONT. 



113, 114, 
R31 

18 

Accept text node for 
deletion and set text 
node index. 

19 


113, 114 

19 

Execute IGDS command 
PTEXTN to place text 
node. 

20 



20 

Execute IGDS command 
PTEXT to place text in 
node and send first line 
to text node. 

21 



21 

Display prompt message 
and get second line of 
node description. 

22 

KEY, NUM 

NUM 

22 

If second line is blank, 
go to step 24. Else 
continue. 

24/23 

• 

MSG, KEY 

23 

Append second line to 
first line to complete 
node description. 

24 

MSG 

NUM, R29, 
KEY, 113, 
114 

24 

Update character count, 
insert line feed in 
second line and send 
line to text node. 

25 

NUM, KEY 


25 

Change node description 
attribute in NDB. 

26 



26 

Display prompt for shift 
factor and get user input 
If keyboard entry go to 
step 28. If reset button 
go to step 30. Else cont 

28/30/27 

KEY, NUM 


n 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 


27 

IMND HIPO - CONTINUED 
Display message indicat- 
ing invalid response and 
go to step 26. 

26 


NUM, KEY 

28 

Check for valid shift 
factor. If invalid 
display message and go to 
step 26. Else continue. 

26/29 


KEY 

2j 

Enter shift factor in 
data base prototype. 

30 



30 

Display prompt for node 
duration and get user 
input. If reset button 
go to step 34. If key- 
board entry go to step 32. 
Else continue. 

34/32/31 

KEY 


31 

Display message indicat- 
ing invalid response and 
go to step 30. 

30 


KEY 

32 

Set ERR register and enter 
node duration in data base 
prototype. 

33 

ERR 

ERR 

33 

If error returned 
display message and go to 
step 30. Else continue. 

30/34 


XUR, YUR 

34 

Execute IGDS command 
ATCPTO to reattach proto- 
type data base entries to 
graphic element. 

35 


CONTRL 

35 

Enable message fields and 
return to IRES user 
command . 

R 

CONTRL 
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3.3.1.15 Modify Project Description Module (IMPD) 

The function of this module is to permit the user to 
modify the values of entries in the Project Definition Block 
(PDB) of the ITIP Data Base. 

Calling sequence: UCM *QS2 : (50,2] IMPD.UCM' 

Modules which call IMPD: 

I RES. UCM 

Modules called by IMPD: 

ITIP.TSK 

IGDS commands used by IMPD: 

None 

Local registers used by IMPD: 

R20 - Data base option code 
R21 - Data base subcode 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMPD HIPO 



CONTRL 

1 

Display command message, 
clear status and error 
fields, and disable 
messages . 

2 

CONTRL 


2 

Set data base option 
code and subcode, call 
FORTRAN task iTIP to 
retrieve project title 
from PDB and display 
project title in status 
field. 

3 

R20 , R21, 
KEY, MSG 


3 

Display prompt for project 
title and get user input. 
If keyboard input, go to 
step 5. If reset button 
go to step 7. Else 
continue . 

5/7/4 

KEY, NUM 


4 

Display message indicating 
invalid response and go 
to step 3. 

3 


NUM 

5 

Set data base option code 
and limit number of 
characters to 30. 

6 

R20, NUM 

R20, R21, 
NUM, KEY 

6 

Call FORTRAN task ITIP 
to store the project 
title in PDB. 

7 



7 

Set data base option code 
and subcode, call FORTRAN 
task ITIP to retrieve 
network ID from PDB. 

8 

R20, R21, 
KEY 

KEY 

8 

Display network ID in 
status field and set 
data base option code. 

9 

MSG, R20 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 


9 

IMPD HIPO - Cont. 

Display prompt for net- 
work ID and gat user 
input. If keyboard 
input go to step 11. If 
reset button go to step 
13. Else continue. 

11/13/10 

KEY, NUM 


10 

Display message indicat- 
ing invalid response and 
go to step 9. 

7 


NUM 

11 

If number of characters 
exceeds 4, set limit to 
4. 

12 

NUM 

R20, R21, 
NUM, KEY 

12 

Call FORTRAN task ITIP 
to store network ID in 
PDB. 

13 



13 

Set data base option 
code and subcode and 
call FORTRAN task ITIP 
to retrieve network 
title from PDB. 

14 

R20, R21 
KEY 

KEY 

14 

Display network title in 
status field and set dati 
base option code. 

15 

MSG, R20 


15 

Display prompt for net- 
work title and 
get user input. If key- 
board input go to step 
17. If reset button 
go to step 19. Else 
continue. 

17/19/16 

KEY, NUM 


16 

Display message indicat- 
ing invalid response and 
go to step 15. 

15 


NUM 

17 

If number of characters 
exceeds 30, set limit to 
30. 

18 

NUM 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMPD HIPO - Cont. 



R20, R21, 
NUM, KEY 

18 

Call FORTRAN task ITIP to 
store network title in 
PDB. 

19 



19 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to 
retrieve start time 
from PDB. 

20 

R20 , R21 
KEY 

KEY 

20 

Display start time in 
status field and set data 
base option code. 

21 

MSG, R20 


21 

Display prompt for start 
time and get user input. 
If keyboard input go to 
step 23. If reset button 
go to step 25. Else 
continue. 

23/25/22 

KEY, NUM 


22 

Display message indicat- 
ing invalid response and 
go to step 21. 

21 


KEY 

23 

Save start time and check 
validity. If not valid 
go to step 22. Else 
continue. 

22/24 

AO, ERR 

R20 , R21, AO 
NUM, KEY 

24 

Call FORTRAN task ITIP to 
store start time in PDB. 

25 



25 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to 
retrieve time units from 
PDB. 

26 

R20, R21, 
KEY 


2i 

Display time units in 
status field and set data 
base option code. 

27 

MSG, R20 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



IMPD HIPO - Continued 




27 

Display prompt for time 
units and get user input. 
If keyboard input go to 
step 29. If reset button 
go to step 31. Else 
continue. 

29/31/28 

KEY, NUM 


28 

Display message indicating 
invalid response and go to 
step 27. 

27 


NUM 

29 

If number of characters in 
time units exceeds 8, set 
limit to 8. 

30 

NUM 

R20 , R21 , 
NUM, KEY 

30 

Call FORTRAN task ITIP to 
store time units in PDB. 

31 



31 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to 
retrieve network duration 
from PDB. 

32 

R20, R21 , 
KEY 

KEY 

32 

Display network duration 
in status field and set 
data base option code. 

33 

MSG, R20 


33 

Display prompt for network 
duration and get user input 
If keyboard input go to 
step 35. If reset button 
go to step 37. Else 
continue . 

35/37/34 

KEY, NUM 


34 

Display message indicating 
invalid response and go to 
step 33. 

33 



35 

Save network duration and 
check validity. If not 
valid go to step 34. Else 
continue . 

34/36 

AO, ERR 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


R20, R21, 

AO, NUM, KEY 

CONTRL 


IMPD HIPO - Cont. 

36 Call FORTRAN cask ITIP to 37 
store network duration in 
PDB. 

37 Enable command and prompt R 
messages and return to 

IRES user command. 


CONTRL 
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3.3.1.16 Extract TRAP File Module (IEXT) 

The function of this module is to extract a TRAP file. 
Calling sequence: UCM 'QS2:(50,2] IEXT.UCM' 

Module called by IEXT: 

IEXT. TSK 

IGDS commands used by IEXT: 

None 

Local registers used by IEXT: 

R20 - FORTRAN task option number 
R21 - FORTRAN task subcode. 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




I EXT HIPO 




I 

Display the command 
message. 

2 



2 

Set data base option code. 

3 

R20 

R20, RIO , 
R16 

3 

Call FORTRAN task IEXT 
to extract the TRAP file. 

4 



4 

Get response back from 
task IEXT. 

5 

R24 

R24 

5 

If an error occurred, 
display a message in the 
error field and set R3 
to one so that module 
ISTF will not be called; 
else continue. 

6 

R3 


6 

Return to IRES user 
command . 

R 

l 










3.3.1.17 Submit TRAP File Module (ISTF) 

The function of this module is to submit a properly 
formatted Trap Input File to the Honeywell 560 via the 
PDP/Honeywell Interface. 

Calling sequence: UCM 'QS2: (50,2] ISTF.UCM' 

Modules which call ISTF: 

I RES. UCM 

Modules called by ISTF: 

ITIP.TSK 

ICXT.TSK 

IGDS commands used by ISTF: 

None 

Local registers used by ISTF: 

None 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


R24 



R20, R21 
R24 


R20, R24 
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3.3.1.18 Define Resource Activity Module (IDRA) 

The function of this module is to permit the user to 
specify values for the entries in the Resource Activity Block 
(RAB) of the ITIP Data Base. 

Calling sequence: UCM 'QS2: [50,2] IDRA. UCM' 

Modules which call IDRA: 

I RES. UCM 

Modules called by IDRA: 

ITIP . TSK 
IRNI.UCM 

IGDS commands used by IDRA: 

LOCELE 

Local registers used by IDRA: 

R20 - Data base option code 
R21 - Data base subcode 
R22 - Data base variable 
R23 - Data base variable 
R26 - Intermediate variable 
R30 - Element type 
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70 











PROCESSING 


OUTPUT 



3/15 


y message indicating 
d response and go to 
6 . 

ement type from TCB. 
ment is ellipse go 
p 20. Else continue. 

y message indicating 
t is not a node and 
step 15. 

IGDS command LOCELE. 

third level return, 
ailing routine name. 


20/19 


0, KEY, NUM 


, ERR 






INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IDRA HIPO - Cont. 

21 retrieve node ID from NDB. 22 R4, UCASC, 

R31 

R26 22 Convert resource activity 23 KEY, R20, 

code and set data base R21 

option code and subcode. 

R20 , R21 , 23 Call a FORTRAN task ITIP 24 

R22, MSG, to store resource activity 

AO, KEY, ID, resource activity code 

R31 resource quantity, and 

node ID in RAB. 

CONTRL 24 Enable command and prompt R CONTRL 

messages and return to 
IRES user command. 


2 






3.3.1.19 Modify Resource Activity Module (IMRA) 

The function of this module is to permit the user to 
modify the values of entries in Resource Activity Block (RAB) 
of the ITIP Data Base. 

Calling sequence: UCM 'QS2: [50,2] IMRA.UCM' 

Modules which call IMRA: 

I RES. UCM 

Modules called by IMRA: 

ITIP .TSK 
IRNI .UCM 

IGDS commands used by IMRA: 

LOCELE 

Local registers used by IMRA: 

R20 - Data base option code 
R21 - Data base subcode 
R22 - Data base variable 
R25 - Number of characters 
R30 - Element type 
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INPUT 

CONTRL 


KEY, NUM 


STEP PROCESSING STEP 



OUTPUT 

CONTRL 


KEY, NUM 


MSG, R25 


XUR, YUR 


74 







INPUT 

STEP 

PROCESSING 

STEP 




IMRA HIPO - Cont. 




10 

Reset I CDS command LOCELE, 
enable third level return, 
save calling routine name, 
and call a module (IRNI) tc 
retrieve node ID from NDB. 

11 

R31 


11 

Set data base option code 
and subcode, convert node 
ID, and set number of 
characters. 

12 

R20, 

R25, 

MSG, 

R21, 

NUM, 

KEY 

12 

Call FORTRAN task ITIP to 
search RAB for occurrence 
of resource activity ID 
for this node. If 
occurrence found go to stej: 
14. Else continue. 

14/13 



13 

Display message indicating 
that resource activity was 
not found and go to step 
24. 

24 



14 

Set data base option sub- 
codes and call FORTRAN 
task ITIP to get resource 
activity code from RAB. 

15 

KEY 


15 

Display resource activity 
code in status field, 
display prompt, and get 
user input. If keyboard 
input go to step 17. If 
reset button go to step 19. 
Else continue. 

17/19/16 



16 

Display message indicating 
invalid response and go to 
step 15. 

15 

KEY 


17 

If resource activity code 
is not valid go to step 16. 

16/18 


OUTPUT 


R4, UCASC 


R20, R21, 
KEY, NUM 


R24 


R21, R22 , 
KEY 


KEY, NUM 


n 


R31 
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STEP 


OUTPUT 





IMRA HIPO - Cont. 



R2G 


18 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store resource 
activity code in RAB. 

19 

R21 



19 

Set data base option code 
and subcode and call 
FORTRAN task ITIP to get 
resource quantity from RAB. 

20 

R20 , R21, 
KEY 



20 

Display resource quantity 
in status field, display 
prompt, and get user input. 
If keyboard input go to 
step 22. If reset button 
go to step 24 . Else 
continue . 

22/24/21 

KEY, NUM 



21 

Display message indicating 
invalid response and go to 
step 20. 

20 


KEY 


22 

Save resource quantity and 
check validity. If 
quantity is not valid go 
to step 21. Else 
continue . 

21/23 

AO, ERR 

R20, 

NUM, 

AO, 

KEY 

23 

Set data base option sub- 
code and call FORTRAN task 
ITIP to store resource 
quantity in RAB. 

24 

R21 

CONTRL 

24 

Enable command and prompt 
messages and return to 
IRES user command. 

R 

CONTRL 







3.3.1.20 Expand Node Module (IEXP) 

The function of this module is to expand a node to 
display the subnodal network which describes it. The design 
space parameters of the node expansion are set and both screens 
updated to activate that design space. 

Calling sequence: UCM 'QS2: [50,2] IEXP. UCM' 

Modules which call IEXP: 

I RES. UCM 

Modules called by IEXP: 

IRNI .UCM 

IGDS commands used by IEXP: 

LOCELE 

UPDBTH 

HALF1 

Local registers used by IEXP: 

R30 - Element type 

11 - X Coordinate 

12 - Y Coordinate 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


I EXP HIPO 

CONTRL 1 Display command and 2 CONTRL 

prompt messages, clear 
message fields, disable 
message fields and continue. 

2 If return code indicates 10/3 

a return from IRNI, go to 

step 10. Else continue. 

3 Execute IGDS command 5/16/4 XUR, YUR 

LOCELE. Get data point to 

locate node. If data 
button go to step 5. If 
reset button go to step 16 , 

Else continue. 

4 Display message indicating 3 

invalid response and go to 
step 3. 

UELETY 5 Issue accept point. Get 7/6 . R30 

element type from TCB. If 
it is on ellipse go to 
step 7. Else continue. 

6 Display a message 3 

indicating node not 
selected and go to 
step 3. 

XUR, YUR 7 Save node coordinates. 8 II, 12 

Issue accept point and 
reset. Display message 
indicating node selected 
and continue. 

R14, R16 8 Save current design space 9 R15, R17 

index in previous design 
space index. Save current 
design space node parent 
in previous design space 
node parent. Save callinc 
routine name, and continue . 







INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



I EXP HIPO - Cont. 



11, 12 

9 

Set up return. Restore 
XUR, YUR coordinates of 
node. Call IRNI user 
command to retrieve node 
index and continue. 

10 

XUR, YUR, R4 


10 

If error returned from 
IRNI, display message 
indicating error and go tc 
step 3. Else continue. 

11/3 


R31 , R14 , 
111, RIO 

11 

Set current design space 
index. Set current node 
parent index. Calculate 
X-Coordinate c:' design 
space set Y-Coordinate of 
design space. Increment 
network level index and 
continue. 

12 

• 

R14 . R16, 

111, 112, RIO 


12 

If zoom index indicates 
lowest level zoom go to 
step 14. If zoom index 
indicates first level 
zoom go immediately to 
step 13. Else execute 
IGDS command HALFl and 
set VNO register to right 
hand screen. Issue accept 
point with VNO register, 
reset and continue. 

14/13 

VNO 


13 

Execute IGDS command HALFl 
Set VNO register to right 
hand screen. Issue accept 
point with VNO register, 
reset and continue. 

14 

VNO 

111,112 

14 

Reset default in zoom and 
orientation indices. Set 
up window origin to curren 

15 

R12, Rll , 
KEY, VNO 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


I EXP HIPO - Cont. 

14 level design space. Set 
VNO re^‘ *er to right hand 
screen, xssue accept point 
with VNO register, reset 
and continue. 

Ill, 112, 15 Set coordinates of left 16 

II, 12 screen. Set up window 

origin to current level 
design space. Set VNO 
register to left-hand 
screen, issue accept point 
with VNO register, reset, 
execute IGDS command 
UPDBTH and continue. 


CONTRL 



Re-enable messages and 
return to response directo 


R 


II, 12, 
KEY, VNO 


CONTRL 
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3.3.1.21 Return to Previous Level Module (IRPL) 

The function of this module is to reset the design space 
parameters to the previous level display and update both 
screens to activate that design space. 

Calling sequence: UCM 'QS2: [50,2] IRPL.UCM' 

Modules which call IRPL: 

I RES. UCM 

Modules called by IRPL: 

None 

IGDS commands used by IRPL: 

HALF1 

UPDBTH 

Local registers used by IRPL: 

R30 - Current design space index 

11 - X Coordinate 

12 - Y Coordinate 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IRPL HIPO 


CONTRL 


R14, R15 , 
R30, 111 


1 


Display command message, 
clear message fields, 
disable message fields, 
and continue. 


2 


2 


If network level inaex 
indicates master level 
go to step 8. Else 
decrement network level 
index by 1, save current 
design space index, reset 
current design space 
index, reset previous 
design space index, adjust 
X, Y Coordinates to 
previous level display 
and continue. 


8/3 


3 


If orientation index 
indicates default origin 
go to step 5. Else set 
orientation index to 
default origin and 
continue. 


5/4 


R12 


4 


If zoom index indicates 
lowest level zoom go to 
step 5. Else decrement 
zoom index by 1 and 
execute IGDS command 
HALFl, set VNO register 
to right-hand screen, 
issue accept point with 
VNO register, reset and 
re-execute this step. 


5/4 


KEY, 

112 


111 , 


5 


Reset window origin to 
master level , set VNO 
register to right-hand 
screen, issue accept 
point with VNO register 
reset and continue. 


9 


6 


CONTRL 


RIO, R30, 
R14 , R15 
111 , 112 


• Rll 


R12, VNO 


KEY, VNO 








INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


111, 112, 
II, 12, 
KEY 


CONTRL 


IRPL HIPO - Con*. 

j 

Set coordinates of left 
screen. Reset window 
origin to master level. 

Set VNO register to left 
hand screen, issue accept 
point with VNO register, 
reset, and continue. 

Execute IGDS command 
UPDBTH and go to Step 9. 

Display message indicating 
cannot return from master 
level, set error code and 
continue . 

Re-enable messages and 
return to response 
director. 




CONTRL 






3.3.1.22 Return to Master Level Module (IRML) 

The function of this module is to 'reset the design space 
parameters to the master level network display and update both 
screens to activate that design space. 

Calling sequence: UCM 'QS2: [50,2] IRML. UCM' 

Modules which call IRML: 

I RES. UCM 

Modules called by IRML: 

None 

IGDS commands used by IRML: 

HALF1 

UPDDTH 

Local register used by IRML: 

11 - Coordinate of left screen 

12 - Coordinate of left screen 
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r 


INPUT 

STEP 

PROCESSING 

STEP 



IRML HIPO 


CONTRL 

1 

Display command message 
clear message fields, 
disable message fields, 
and continue. 

2 

R14, Rl6 

2 

Set network level Index tc 
master level , save 
previous design space 
Index, reset current 
design space Index, save 
previous node parent, set 
node parent of master 
level, adjust X,Y 
Coordinates of design 
space and continue. 

3 


3 

If orientation index 
indicates default origin 
go to step 5. Else set 
orientation index to 
default origin and 
continue . 

5/4 

• 

R12 

4 

If zoom index indicates 
lowest level zoom go to 
step 5. Else decrement 
zoom index by 1, execute 
IGDS command HALFl , set 
VNO register to right- 
hand screen, issue accept 
point with VNO register, 
reset and re-execute this 
step. 

5/4 

111, 112, 
KEY 

5 

Reset window origin to 
master level. Set VNO 
register to right-hand 
screen, issue accept 
point with VNO register, 
reset and continue. 

6 


OUTPUT 


CONTRL 


RIO, R15, 
R14, R17, 
R16, 111, 
112 


Rll 


R12, VNO 


VNO 

KEY 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


111, 112, 
II, 12 
KEY 


CONTRL 


IRML HIPO - Cont. 


6 Set coordinates of left- 7 

hand screen. Reset 
window origin to master 
level design space. Set 
VNO register to left- 
hand screen, issue 
accept point with VNO 
register, reset and 
execute IGDS command 
UPDBTH . 

7 Re-enable messages and R 

return to response 
director. j 


II, 12, 
KEY, VNO 


CONTRL 
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3.3.1.23 Redefine Window Center Module (ISWC) 

The function of chis module is to permit the user to 
redefine the window center of the current design space. 

Calling sequences UMC 'QS2: 150,2] ISWC.UCM' 

Modules which call ISWC: 

I RES. UMC 

Modules called by ISWC: 

None 

IGDS commands used by ISWC: 

UPDAT1 

Local registers used by ISWC: 

R30 - Element type 

11 - X Coordinate 

12 - Y Coordinate 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 



XUR, YUR 

GOXUOR, 

GOYOUR 


II, 12 


II, 12 



ISWC HIPO 

Display command and prompt 
messages and clear message 
fields and continue. 

2 


Get data point to locate 
window center. If data 
button go to step 4. If 
reset button go to step 9. 
Else continue. 

Display message indicating 
invalid response and go 
to step 1. 

4/9/3 

1 

XUR, YUR 

Reset design space 
parameters and store. If 
zoom index indicates zoom 
at lowest level go to step 
7. If zoom index indicates 
zoom at first level go to 
step 6. Else continue. 

7/6/5 

11, 12 

Reset orientation index 
to zoom and window center. 
Adjust coordinates of 
design space to zoom at 
second level then go to 
step 8. 

8 

111, 112, Rll 

Adjust coordinates of 
design space to zoom at 
first level. Reset 
orientation index to zoom 
and window center. Then 
go to step 8. 

8 

111, 112, Rll 

Reset orientation index 
to origin redefined via 
window center. Adjust 
coordinates of design 
space to zoom at lowest 
level and continue. 

8 

111, 112, 
Rll 


88 









INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


111 , 112 


ISWC HIPO - Cont. 

8 Set coordiantes of window 9 
center in data base proto- 
type. Set VNO register 

to right-hand screen. 

Issue accept point with 
VNO register. Execute 
IGOS command UPDAT1 and 
continue. 

9 Return to response R 

director. 


KEY, VNO 












3.3.1.24 Default Window Center Module (IDWC) 

The function of this module is to permit the user to 
redefine the window center to the default center of the 
current design space. 

Calling sequences UMC 'QS2: [50,2] IDWC.UMC' 

Modules which call IDWC: 

IRES.UCM 

Modules called by IDWC: 

None 

IGDS command j used by IDWC: 

WINDC1 
UP DAT 1 

Local registers used by IDWC: 


None 



INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IDWC HIPO 


CONTRL 


1 


Display command message 
clear message fields, 
disable message fields 
then continue. 


2 


CONTRL 


111, R14 


2 


If orientation index 
indicates window unchange< 
go to step 8. Else 
redefine coordinates of 
window center and continue. 


8/3 


111 , 112 


111 , 112 

GOXUOR, 

GOYOUR 


Rll , 111 
112 


111 , 112 


111 , 112 


3 


4 


5 


6 


Execute IGDS command 
WINDC1. Adjust coordinates 
to the current design space. 
Issue accept point. Set 
VNO register to right- 
hand screen, and issue 
accept point with VNO 
register . 


4 


Reset orientation index. 

If zoom inddx indicates 
zoom at lowest level, 
go to step 6. If zoom 
index indicates zoom at 
first level, go to step 5. 
Else adjust coordinates 
to zoom at second level 
and go to step 7. 


6/5/7 


Adjust coordinates of 
design space to zoom at 
first level. Go to 
step 7. 


7 


Adjust coordinates of 
design space to zoom at 
lowest level and continue. 


7 


XUR, YUR 
VNO 


Rll, 111, 
112 


111 , 112 


111 , 112 


7 


Execute IGDS command 
UPDATl . 


8 


9 







INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CONTRL 
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3.3.1.25 Zoom in Module (IZMI) 

The function of this module is to permit the user to 
zoom in on the current design space. 

Calling sequence: UMC 'QS2 : [50,2] IZMI.UMC' 

Modules which call IZMI: 

IRES.UCM 

Modules called by IZMI: 

None 

IGDS commands used by IZMI: 

HALF 1 
UPDATl 

Local registers used by IZMI: 

None 
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INPUT 

STEP 1 

PROCESSING 

STEP 

OUTPUT 




IZMI HIPO 





1 

Display command message, 
clear messaqe fields, and 
continue. 

2 




2 

If zoom index indicates 
zoom out twice go to step 
4. If zoom index indicate 
zoom past default level go 
to step 9. Else continue. 

4/;, 3 

B 


111, 

112 

3 

Adjust coordinates of 
design space to zoom in 
once then go to step 5. 

5 

111, 112 

111, 

112 

4 

Adjust coordinates of 
design space to zoom in 
twice then continue. 

5 

111, 112 

R12 


5 

Decrement zoom index by 
one. If zoom index not 
at the lowest level go to 
step 7. Else continue. 

7/6 

R12 

Rl.l 


6 

Decrement orientation 
index and continue. 

7 

Rll 



7 

Execute IGDS command HALFl 
set VNO register to right- 
hand screen, issue accept 
point with VNO register, 
issue reset command and 
continue. 

8 

VNO 



8 

1 Execute IGDS command 
UPDAT1 and go to step 10. 

10 




9 

Display message indicating 
cannot zoom past this 
level, reset option index. 

10 

Rl 



10 

Return to response directo 

] R 








3.3.1.26 Zoom Out Module (IZMO) 

The function of this module is to permit the user to 
zoom out on the current design space. 

Calling sequence* UMC 'QS2: 150,2] IZMO.UMC' 

Modules which call IZMO: 

I RES. UMC 

Modules called by IZMO: 

None 

IGDS commands used by IZMO: 

DOUBL1 
UP DAT 1 

Local registers used by IZMO: 

None 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IZMO HIPO 

1 Display command message, 2 

clear message fields and 
continue. 

R12 2 If zoom index indicates 8/3 R12 

zoom out twice go to 
step 8. Else increment 
zoom index and continue. 

Rll 3 If orientation index 4/5 Rll 

indicates window center 
changed go to step 4. 

Else reset orientation 
index to zoom only and 
go to step 5. 

4 Reset orientation index 5 Rll 

to both window and zoom 
then continue. 

Ill, 112 5 If zoom index indicates 6/7 111, 112 

zoom out twice go to 6. 

Else adjust coordinates 
to zoom out once and go 
to step 7. 

Ill, 112 6 Adjust coordinates of 7 111, 112 

design space to zoom out 
twice and continue. 

7 Execute IGDS command 9 VNO 

DOUBL1, set VNO register 

to right-hand screen, 
issue accept point with 
VNO register, issue 
reset command, execute 
IGDS command UPDATl , and 
go to step 9. 

8 Display message indicating 9 RO 

cannot zoom more than 

twice, reset option index 

anH i nna *■ I 
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3.3.1.27 Return Node Information Module (XRNI) 

The function of this module is to retrieve the node ID 
and coordinates of the node center from che Node Definition 
Block (NDB) of the data base. 

Calling sequence: UMC 'QS2: [50,2] IRNI.UMC' 

Modules which call IRNI: 

IRES.UCM 

Modules called by IRNI: 

ITIP.TSK 

IGDS commands used by IRNI: 

LOCELE 

Local registers used by IRNI: 

15 - X Coordinates 

16 - Y Coordinates 

R20 - Option number for FORTRAN task 

R21 - Suboption 

R22 - Entity number 

R23 - Occurrence number 

R24 - Protection counter 

R30 - Element type 
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XUR, YUR 

3 

Execute IGDS command 
LOCELE to locate ellipse 
and go to step 5. 

5 



15, 16, R20 

4 

Give another point and 
increment loop counter . 
If loop limit exceeded 
go to step 11. Else 
continue. 

11/5 

R20 


UELETY 

e 

Get element type from 
TCB. If element is 
ellipse go to step 7. 
Else continue. 

7/6 

• 

• R30 


15 

6 

Reject trial point, 
increment X coordinate, 
and go to step 4 . 

4 

15 


BYTLEN 

7 

Set data base option code 
and get design buffer 
index from TCB. 

8 

R20, 

R21 

R21, DGNBUP 

8 

Get entity number, 
occurrence number and 
protection number from 
design buffer. 

9 

R22, 

R24 

R23, 


9 

Set data base option sub- 
code. 

10 

R21 


R20, R21 , R22, 
R23, R24 

10 

Call FORTRAN task ITIP to 
retrieve mode ID and X and 
Y coordinates of node 
punter frnm NnR. 

11 

R31, 

113, 
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3.3.1.28 Arrowhead Generation Module (ARO) 

The function of this module is to create an arrowhead cell 
and to enter * .is in the ITZP Cell Library for use in placing 
edges . 

Calling sequence: UMC 'QS2: (50,2) ARO.UMC' 

Modules which are ARO: 

None 

Modules called by ARO: 

None 

I CDS commands used by ARO: 

PLINE 

PFENCB 

DOCELL 

DLFNCC 

Local registers used by ARO: 

11 - X coordinate 

12 - Y coordinate 

13 - Y coordinate 

14 - X coordinate 

15 - Y coordinate 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


XUR, YUR 

II, 12, 
14, 15 

II, 13, 
14, 15 

II, 12, 

13, 14 

14, 15 


14, 15 



ARO HIPO 



1 

Retrieve cell library 
ITIP.CEI . 

1 


2 

Display command and prompt 
messages -I, RATE ARROW 

and GIV? ' ’ POINT. 

3 


3 

Get input point . 

4 

XUR, YUR 

4 

Calculate coordinates of 
arrowhead. 

5 

11, 12, 13 
14, 15 

5 

Execute IGDS command PLINE 
to draw lower half of 
arrowhead. 

6 


6 

Execute IGDS command 
PLINE to draw upper half 
of arrowhead. 

7 


7 

Calculate fence coordinate 
and execute IGDS command 
PFENCB to place fence 
block around the arrow- 
head. 

B 8 

11, 12 

8 

Execute IGDS command 
DOCELL to define cell 
origin at the point of 
arrowhead. 

9 


9 

Create point cell named 
ARO containing the arrow- 
head in the ITIP.CEL 
library. 

10 


10 

Execute IGDS command 
DLFNCC to delete the fence 
contents (arrowhead) . 

11 


11 

Display message OPERATION 
COMPLETE and exit. 

E 
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3.3.2 FORTRAN Modules 

The FORTRAN software which supports the ITIP consists 
of two tasks ITIP and IEXT. The ITIP task supports the 
interactive creation of a network and the IEXT task extracts 
and submits the TRAP file. Both tasks are activated by nodes 
being sent from user commands. The tasks then respond 
according to the data received from the user commands and send 
data back to the user commands. 

The ITIP task is initially activated and then remains 
in execution for the d .ration of the ITIP session. The task 
establishes an Asynchronous System Trap (AST) when it is 
initially executed. The AST will occur each time a node is 
sent to the ITIP task. The task will respond to the node and 
then go into a wait state until the next node is received. A 
node is sent at the end of the ITIP session to cause the task 
to exit from the system. This task uses a utility package 
developed by Intergraph called Attribute Services (AS) . AS 
handles the interface to the DMRS for the storage, modification, 
and retrieval of data from the data base. 

The IEXT task is activated by a user command sending a 
node to the task. The task responds to the node and then 
exits the system. This task uses the DMRS Host Language 
(HOL) to retrieve data from the database. 

One limitation of this technique is that the FORTRAN 
tasks cannot interact directly with the user but must interact 
indirectly through user commands. 

T)iis section contains a description and Hierarchial Input 
Processing Output (HIPO) for each of the modules in tasks ITIP 
and IEXT. The structure charts for these two tasks are in 
figures 3. 3. 2-1 and 3. 3. 2-2. The description of each module 
consists of: 

• Function of the module 

• Calling sequence 

• Modules which call this module 

• Modules called by this module 

Each HIPO contains the principal functions performed within the 
module. Also included with each function are a list of the 
inputs which may be required to perform the function and a list 
of the outputs which may be created as a result of performing 
the function. 
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FIGURE 3. 3. 2-1 ITIP STRUCTURE CHART (FORTRAN 





LEGEND: 

n 

ITIP MODULE 


i i 

LIBRARY MODULE 

o 

PREDEFINED MODULE 


JfiSOLDo 


IUCTURE CHART (FORTRAN TASK) 



TRAP FILE 



I EXT STRUCTURE CHART (FORTRAN TASK) 















3. 3. 2.1 Create a Default PDB Module (DEFPDB) 

The function of this module is to store default values 
into the Project Description Block. 

Calling sequence: 

Call DEFPDB (ISC, IARG, RARG, ISTRNG, CITASK, I ERR) 
Modules which call DEFPDB: 

ITIP 

Modules called by DEFPDB: 

DEFPN2, NXTLID, DEFATT, INSENT, VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




DEFPDB 




1 

Call a module (DEFEN 2) 
to define the PDB aa the 
prototype. 

2 

IERR 

IERR 

2 

If an error occurred 
go to step 9. 

9/3 



3 

Call a module (NXTLID) 
to get the next occurrenc 
of the PDB entity. 

4 

e 

LID, IERR 

IERR 

4 

If an error occurred 
go to step 9. 

9/5 


DEFALT 

5 

Call a module (DEFATT) 
to move the defaults for 
the PDB into the DMRS 
dynamic region. 

6 

IERR 

IERR 

7 

If an error occurred 
go to step 9. 

9/8 


LID 

8 

Call a module (INSENT) 
to store the default 
values. 

9 

IERR 

IERR 

9 

Call a module (VSENDM) 
to send the return code 
to the Cl task. 

R 









3. 3. 2. 2 Define a RAB Module (DEFRAB) 

The function of this module is to define a Resource 
Activity Block (RAB). Two calls are made to this routine. 
The first determines if any RAB's are available. The second 
call stores data in the first available RAB. 

Calling sequence: 

Call DEFRAB (ISC, ISTRNG, IARG, RARG, CITASK, IRC) 
Modules which call DEFRAB: 

ITIP 

Modules called by DEFRAB: 

DEFEN2, NXTLID, DEFATT, INSENT, VSENDM 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



DEFRAB 



ISC 

1 

If this is a store 
request go to step 6; 
else continue. 

6/2 



2 

Call module (DEFEN2) 
to define the RAB as 
the active prototype. 

3 

IRC 

IRC 

3 

If an error occurred 
go to step 15; else 
continue. 

15/4 



4 

Get the linkage for the 
next available occurrence 
of the RAB entity. 

5 

LID, IRC 


5 

Go to step 15. 

15 


ISTRNG , I ARC 

6 

Put the resource ID in 
the DMRS command buffer. 

7 

IDATA 

ISTRNG 

7 

Put the resource 
activity code in the 
DMRS command buffer. 

8 

IDATA 

RARG ( 1 ) 

8 

Put the resource quantity 
in the DMRS buffer. 

9 

IDATA 

IARG (2) 

9 

Put the RAB owner in 
the DMRS buffer. 

10 

IDATA 

RARG (2) , IVAL 

10 

Put the expansion owner 
in the DMRS buffer. 

11 

IDATA 

ICHAR, IDATA 

11 

Call a module (DEFATT) to 
move the DMRS buffer to 
the DMRS dynamic region. 

12 

IRC 

IRC 

13 

If an error occurred 
go to step 15; else 
continue. 

15/14 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




DEFRAB (continued) 



LID 

14 

Call a module (INSENT) 
to insert the data into 
the database. 

15 

IRC 

IRC 

15 

Call a module (VSENDM) 
to send the return code 
to the Cl task. 

R 

i 

! 

i 

i 










3. 3. 7.. 3 Define a RDB Module (DEFRDB) 

The function of this module is to allocate a Resource 
Description Block (RDB) and store data into it. 

Calling sequence: 

Call DEFRDB (ISC, IRID, IRDESC, IARG, CONST, RQTY, 
CITASK, IRC) 

Modules which call DEFRDB: 

ITIP 

Modules called by DEFRDB: 

DEFEN 2 , NXTLID, DEFATT, INSENT, VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




DEPRDB 



ISC 

1 

If It is desired to store 
the resouce ID, descript- 
ion, constraint level and 
initial quantity go to 
step 7 ; else continue. 

7/2 


ISC 

2 

If it is desired to store 
the resource flags and 
function go to step 11; 
else continue. 

11/3 



3 

Call a module (DEFEN 2) 
to define the RDB as the 
prototype . 

4 

IRC 

IRC 

4 

If an error occurred 
go to step 15; else 
continue. 

15/5 



5 

Call a module (NXTLID) 
to get the next avail- 
able occurrence of the 
prototype. 

6 

LID, IRC 


6 

Go to Step 15. 

15 


IRID, IARG (1) 

7 

Store the resource 
constraint level in the 
DMRS command buffer. 

8 

I DATA 

IRDESC, IARG (2) 

8 

Store the resource 
description in the DMRS 
command buffer. 

9 

I DATA 

CONST 

9 

Store the resource 
constraint level in the 
DMRS c'.mmand buffer. 

10 

I DATA 

RQTY 

10 

Store the resource initia 
quantity in the DMRS 
command buffer and go to 
step 15. 

L 11 

I DATA 

IARG 

11 

Store the resource flags 
and the resource function 
in the DMRS command buffe 

12 
c . 

I DATA 






INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



DEFRDB ( continued ) 



ICHAR, IDATA 

12 

Call a module (DEFATT) 
to put the DMRS command 
into the DMRS dynamic 
region. 

13 

IRC 

IRC 

13 

If an error occurred go 
to step 15; else continue 

15/14 


LID 

14 

Call a module (INSENT) 
to insert the data into 
the database. 

15 


IRC 

15 

Put the return code in a 
buffer and send it to the 
Cl task. 

R 

I OUT 
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3. 3. 2.4 Database Access Main Module (ITIP) 

This is the main routine for the ITIP program. This 
module receives nodes from a Cl task and then directs processing 
according to an option number received in the node. 

Calling sequence: 

None 

Modules which call ITIP: 

None 

Modules called by ITIP: 

SETAST, LKTCSI, INAS, SETEF, RESUME, WAITFR, CLREF, 

VRECVM, WAIT, VSENDM, DEFRDB, MODRDB, NID, RETPDB, 

STOPDB , DEFPDB, DEFRAB, MODRAB, DEAS 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



ITIP 




1 

Call a module (SETAST) 
to establish a receive 
data AST. 

2 



2 

Call a module (LKTCSI) 
to put the database name 
into proper format for 
attribute services (AS) 
software. 

3 

IFILE , IRC 

IRC 

3 

If an error occurred 
write a message and go to 
step 24; else continue. 

24/4 


IFILE,REGNAM 

4 

Call a module (INAS) 
to initialize the AS 
interface. 

5 

1RC,REGNAM 

IRC 

5 

If an error occurred 
write a message and go to 
step 24; else continue. 

24/6 


REVF 

6 

Call a module (SETEF) 
to set an event flag 
which will signal a node 
is queued to the ITIP 
task. 

7 



7 

Go to step 9. 

9 


CITASK 

8 

Call a module (RESUME) 
to resume the Cl task. 

9 


REVF 

9 

Call a module (WAITFR) 
to wait for the event 
flag (REVF ) , which indi- 
cates a node is queued, 
to be set by the AST 
service routine. 

10 


REVF 

10 

Call a module to clear 
the event flag. 

11 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




ITIP (continued) 




11 

Call a module to receive 
the node which ha a been 
queued to the ITIP 
task. 

12 

IOP, ISC, 
CITASK, RARG, 
IARG, ISTRNG 

IOP,ISC 

12 

If this is a request 
to delay call a module 
(WAIT) to wait the indi- 
cated number of seconds 
(ISC), send a node back 
to the Cl task and go to 
step 8; else continue. 

8/13 


IOP,ISC, 

I ARG , RARG , 
ISTRNG, CITASK 

13 

If this is a request 
to modify a RDB call a 
module (MODRDB) to make 
the modification and 
then go to step 8; else 
continue . 

8/14 

I ERR 

IOP , IARG 

14 

If this is a request to 
retrieve a rode ID call 
a module (NID) to get the 
node ID and center 
coordinates, then go 
to step 8; else continue. 

8/15 

I ERR 

IOP, ISC, 

RARG, IARG, 
ISTRNG ,CITASK 

15 

If this is a request to 
to get PDB data call a 
module (RETPDB) to get 
the desired data and then 
go to step 8; else 
continue. 

8/16 

IERR 

IOP 

16 

If this is not a request 
to create a default PDB 
go to step 19; else 
continue. 

19/17 


ISC, IARG, 
RARG, ISTRNG, 
CITASK 

17 

Call a module (DEFPDB) 
to create the default 
PDB. 

18 

IERR 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



ITIP (continued) 




18 

If an error occurred go 
to step 24; else go to 
step 8. 

24/8 


IOP 

19 

If this is not a request 
to define a RAB go to 
step 22; else continue. 

22/20 


ISC , ISTRNG , 
IARG , RARG , 
CITASK 

20 

Call a module (DEFRAB) 
to define the RAB. 

21 

IERR 


21 

If an error occurred 
go to step 24; else 
go to step 8. 

24/8 


IOP , ISC , IARG , 
RARG, ISTRNG, 
CITASK 

22 

If this is a modify RAB 
request call a module 
(MOD RAB) to modify the 
RAB and then go to step 
8; else continue. 

8/23 

IERR 

IOP 

23 

If this is an option 
to stop the ITIP system 
go to step 25. 

25 



24 

Detach from the AS 
interface, resume the 
Cl task, print a mess- 
age to indicate an 
abnormal exit and exit. 

S 



25 

Detach from the AS 
interface, resume to Cl 
task, print a message 
indicating a normal 
exit and exit. 

S 
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3. 3. 2. 5 Modify a RAB Module (MODRAB) 

The function of this module is to modify a predefined 
resource activity block. 

Calling sequence: 

Call MODRAB (ISC, IARG, RARG, ISTRNG, CITASK, IRC) 
Modules which call MODRAB: 

ITIP 

Modules called by MODRAB: 

DEFREV, DEFEN 1 , GETATT, DEFATT, CHGI2NT 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 

1 


MODRAB 




1 

Set the return code to 
indicate no error, set 
the default attribute 
value and length, set 
the retrieved resource 
ID and mode ID to blanks. 

2 

I RC , IOUT , 

I ATT, I ATT 2 

ISC 

2 

If the request is not to 
determine if the RAB is 
defined go to step 10; 
else continue. 

10/3 



3 

Define the initial 
linkage ID for beginning 
the search for the RAB 
and set the return code 
to indicate RAB not found 

4 

» 

LID, IOUT 


5 

Call module (DEFREV) to 
define the review table 
for the RAB entity. 

6 

IRC 

IRC 

6 

If an error occurred 
go to step 17; else 
continue. 

17/7 


ISTRNG, LID 

7 

Loop through all defined 
RAB's to search for the 
particular RAD desired. 

8 

IOUT 


9 

Go to step 17. 



ISC 

10 

If this is not a request 
to retrieve data from 
the RAB go to step 13; 
else continue. 

13/11 


LID , IARG ( 1 ) 

11 

Call a module (GETATT) 
retrieve the desired 
attribute value. 

12 

IOUT, IRC 


12 

Go to step 17. 

17 



119 


INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IARG , 
ISTRNG 

IDAT, ICHAR 

IRC 

LID 

IOUT, IRC 


MODRAB (continued) 

13 Move the attribute 14 IDAT 

number and its value to 

DMRS buffer so that it 
can be stored. 

14 Call a module (DEFATT) 15 IRC 

to move the DMRS command 

into DMRS dynamic region. 

15 If an error occurred 17/16 

go to step 17; else 

con tin ue. 

16 Call a module (CHGENT) 17 IRC 

to store the data into 

the database. 

17 Call a module (VSENDM) R 

to send the return code 

and any requested 
attribute value to the 
CT task. 






3. 3. 2. 6 Modify a RDB Module (MODRDB) 

The function of this module is to modify a Resource 
Description Block (RDB) . 

Calling sequence: 

Call MODRDB (ISC, IARG, RARG, ISTRNG, CITASK, IRC) 
Modules which call MODRDB: 

ITIP 

Modules called by MODRDB: 

DEFREV, DEFEN1, GETATT, DEFATT, CHGENT, VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


MODRDB 

ISC 1 If it is desired to store 11/2 

data into a particular 
ROB go to step 11; else 
continue. 

ISC 2 If it is desired to 10/3 

retrieve data from a 
particular RDB go to step 
10; else continue. 

ISC 3 If it is desired to see 5/4 

if a particular RDB exist 
go to step 5; else 
continue. 

4 Write an error message 15 

and go to step 15. 

LID 5 Call a module (DEFREV) 6 IRC 

to define a review table 
so that attributes can be 
retrieved. 

IRC 6 If an error occurred go 15/7 

to step 15; else continue . 

ISTRNG 7 Search for the particular 8 IRC 

RDB. 

IRC 8 If it is found set the 9 IRC 

return code to so 
indicate; else set the 
return code to indicate 
not found. 

9 Go to step 15. 15 

LID , IARG ( 1 ) 10 Call a module (GETATT) 15 IOUT,IRC 

to retrieve the desired 
attribute number and 
value. 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




MODRDB (continued) 



ISTRNG, IARG 

11 

Build a DMRS command 
using the attribute 
number and value. 

12 

IDAT, ICHAR 

ICHAR, I DAT 

12 

Call a module (DEFATT) 
to move the command 
to the DMRS dynamic 
region. 

13 

IRC 

IRC 

13 

If an error occurred 
go to step 15; else 
continue 

15/14 


LID 

14 

Call a module (CHGENT) 
to modify the attribute 
value. 

15 

IRC 

IRC , IOUT , LEN 

15 

Call a module (VSENDM) 
to send the return code 
and any attribute value 
requested back to the 
Cl task. 

16 

IDS 

IDS 

16 

If an error occurred 
write a message. 

17 



17 

Return 

R 








3. 3. 2. 7 Retrieve Node ID and Center Module (NID) 

The function of this module is to retrieve the node ID 
and node center coordinates given a DMRS linkage ID. 

Calling sequence: 

Call NID (CITASK, LID, IRC) 

Modules which call NID: 

ITIP 

Modules called by NID: 

DEFREV, GETATT, VSENDM 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



NID 



LID (1) 

1 

If the linkage ID does 
not indicate a NDB entity 
go to step 14; else 
continue. 

14/2 



2 

Call a module (DEFREV) 
to define a review 
tabr.e for the NDB 
entity. 

3 

IRC 

IRC 

3 

If an error occurred 
go to step 14; else 
continue. 

14/4 


LID 

4 

Call a module (GETATT) 
to retrieve the node 
ID. 

5 

NC, IDATA, 
IRC 

IRC 

5 

If an error occurred 
go to step 14; else 
continue. 

14/6 


IDATA,NC 

6 

Store the node ID in 
an output buffer. 

7 

IOUT 

LID 

7 

Call a module (GETATT) 
to retrieve the node 
center X coordinate. 

8 

NC , ID. .TA, IRC 

IRC 

8 

If an error occurred 
go to step 14; else 
continue . 

14/9 


IDATA, NC 

9 

Store the X coordinate in 
the output buffer. 

10 

ICPT(l) 

LID 

10 

Call a module (GETATT) 
to retrieve the node 
center Y coordinate. 

11 

NC, IDATA, IRC 

IRC 

11 

If an error occurred 
go to step 14; else 
continue. 

14/12 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


NID (continued) 

IDATA,NC 12 Store the Y coordinnte 13 

in the output buffer. 

IOUT 13 Swap the words of the 14 

X and Y coordiantes so 
that they will be in 
IGDS coordinates. 

IOUT,CITASK 14 Call a module (VSENDM) 15 

to send the output 
buffer to the Cl task. 

IDS 15 If an error occurred 16 

output a message. 

16 Return. R 


ICPT (2) 
IOUT 

IDS 







3. 3. 2.8 Retrieve PDB Data Module (RETPDB) 

The function of this module is to retrieve data from the 
Project Description Block (PDB) . 

Calling sequence: 

Call RETPDB (ISC, IARG, ISTRNG, CITASK, IRC) 

Modules which call RETPDB: 

ITIP 

Modules called by RETPDB: 

DEFREV, GETATT, VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


IRC 

LID, ISC 
IRC 

IOUT, LEN 
IDS 


RETPDB 



Define the linkage ID, 
default attribute value 
and attribute length. 

2 

LID, CHAR, 
NC 

Call a module (DEFREV) 
to define t>a review 
table ao that attributes 
can be retrieved. 

3 

IRC 

If an error occurred go 
to step 7. 

7/4 


Call a module (GETATT) 
to retrieve the desired 
attribute value. 

5 

NC, CHAR, IRC 

If an error occurred 
go to step 7. 

7/6 


Set the return code to 
to indicate the attribute 
value was retrieved. 

7 

I ERR 

Call a module (VSENDM) 
to send the return 
code and attribute 
value back to the Cl 
task . 

8 

IDS 

If an error occurred 
write a message. 

9 


Return 

R 
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3. 3. 2.9 Establish Receive Data AST Module (SETAST) 

The function of this module is to set up a receive 
data AST. This module also contains the service routine which 
is called when the AST occurs. 

Calling sequence: 

Call SETAST 

Modules which call SETAST: 

ITIP 

Modules called by SETAST: 

SRDA$ , SETF$, ASTX$ 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


SETAST 

Entry Point SETAST 


Call a module (SRDA$C) to 
establish a receive data 
AST. 


Entry Point ROAST 

Call a module (SETF$C) to 
set event flag one. 


2 Call a module (ASTXS) to R 

exit the AST service 
routine. 
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3.3.2.10 Store PDB Data Module (STOPDB) 

The function of this module is to store data values into 
the Project Description Block (PDB) . 

Calling sequence: 

Call STOPDB (ISC, IARG, RARG, ISTRNG, CITASK, I ERR) 
Modules which call STOPDB: 

ITIP 

Modules called by STOPDB: 

DEFEN 1, DEFATT, CHGENT, VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




STOPDB 



ISC , ISTRNG 
IARG(l) 

1 

Build DMRS COMMAND to 
store the attribute value 
in the PDB. 

2 

IBYTE, ICHAR 


2 

Set up the linkage for 
the PDB 

3 

LID 

LID 

3 

Call a module (DEFEND 
to define the prototype. 

4 

IERR 

ICHAR, IBYTE 

4 

Call a module (DEFATT) to 
put the command into the 
DMRS dynamic region. 

5 

IERR 

LID 

5 

Call a module (CHGENT) 
to modify the data in 
database. 

6 

IERR 

IERR 

6 

Send the return code to 
the Cl task. 

R 

IOUT 









3.3.2.11 Extract EDB Module (EXTEDB) 

The function of this module is to extract the edge 
description data and write it to the TRAl file. 

Calling sequence: 

Call EXTEDB (NPAREN, IPT, I ERR) 

Modules which call EXTEDB: 

EXTFIL 

Modules called by EXTEDB: 

DMREQ 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



EXTEOB 



CBREQU 

1 

Create a universe file 
which contains all EDB's 

2 

CBNSTZ, 

CBRETC 

CBUSIZ 

2 

Write the number of EDB's 
to the TRAP file. 

3 


CBUSIZ, 

CBRETC 

3 

If there are no EDB's go 
to step 11; else continue. 

11/4 


CBREQU 

4 

Ready the universe for 
access . 

5 

CBRETC 

CBRETC 

5 

If an error occurred go to 
step 11; else continue. 

11/6 


CBREQU 

6 

Get the first/next entry 
from the universe file. 

7 

CBRETC 

CBRETC 

7 

If an error occurred or 
no more EDB's exist, go 
to step 11; else continue. 

11/8 



8 

Write a dummy edge ID to 
the TRAP file. (The ID 
is not used) . 

9 


CBTXT, CBLNG 

9 

Get the edge predecessor 
and successor and write 
them to the TRAP file. 

10 



10 

Go to Step 6. 

6 



11 


Set the return code and 
return 


R 


IERR 









3.3.2.12 Extract TRAP File Control Module (EXTFIL) 

The function of this module is to control the extraction 
of data for the TRAP file. 

Calling sequence: 

Call EXTFIL (CITASK, NLEV, NPAREN, I ERR) 

Modules which call EXTFIL: 

EXTMN 

Modules called by EXTFIL: 

DMRLQ, EXTPDB , EXTRDB, EXTNDB , EXTEDB , VSENDM 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


LENPDB , LENRDB 
LENNDB , LENRAB 
LENEDB 

LOCRDB 

CBREQU 

CBRETC , RTNSUC 

CBREQU, CBTXT 
CBLNG 

CBRETC, RTNSUC 

NLEV , IPT 

IERR 

IPT 



EXTFIL 



1 

Open the output TRAP file 

2 


2 

Write the length of the 
PDB,RDB,NDB,RAB and ED3 
to the TRAP file. 

3 


3 

Write the pointer to the 
first RDB to the TRAP 
file. 

4 


4 

Set the HOL CB request 
code and call a module 
to attach to DMRS. 


CBRETC 

5 

If an error occurred 
go to 17; else continue. 

17/6 


6 

Set the HOL CB request 
code and call a module 
(DMREQ) to define the 
database. 

7 

CBRETC 

7 

If an error occurred 
go to 17; else continue. 

17/8 


8 

Set a pointer to indicate 
the next record to be 
written in the TRAP file. 

9 

IPT 

10 

Call a module (EXTPDB) to 
to extract the PDB data 
and write it to die TRAP 
file. 

11 

IERR 

11 

If an error occurred go 
to 17; else continue. 

17/12 


12 

Call a module (EXTRDB) 
to extract the RDB data 
and write it to the TRAP 
file. 

13 

IERR 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




EXTFIL (continued) 



IERR 

13 

If an error occurred go 
to 17; else continue. 

17/14 


NPAREN , IPT 

14 

Call a module (EXTNDB) 
to extract the NDB's 
and their associated 
RAB's and write the data 
to the TRAP file. 

15 

IERR 

IERR 

15 

If an error occurred go 
to 17; else continue. 

17/16 


NPAREN, IPT 

16 

Call a module (EXTEDB) 
to extract the EDB data 
and write it to the 
TRAP file. 

17 

IERR 

IERR,CITASK, 

IOUT 

17 

Store the return code 
in a buffer and send the 
buffer to the Cl task. 

18 

IDS 

IDS 

18 

If an error occurred 
sending data write a 
message. 

19 


CBREQU 

19 

Close the TRAP file and 
detach from DMRS. 

R 







3.3.2.13 Extract TRAP File Main Module (EXTMN) 

The function of this module is to receive a node from 
the Cl task and then call a module which controls the collection 
of data for the TRAP file. 

Calling sequence: 

None - This is the main routine. 

Modules which call EXTMN: 

None 

Modules called by EXTMN: 

EXTFIL, VRECVM, RESUME 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


EXTMN 


1 


IDS 2 

IARG, CITASK, 3 
IOP 


CITASK, 

IOP 


4 


Call a module (VRECVM) 
to receive a node from tho 
Cl task. 


2 


If an error occurred go to 5/3 
step 5; else continue. 

If the request is to 4 

extract a TRAP file call 
a module (EXTFIL) to do 
the extraction; else 
continue. 


If the request is to 
submit a TRAP file call 
a module (SUBFIL) to do so ; 
else continue. 


5 


IOP, 

IARG 


I ERR 


IERR 


5 


Call a module (RESUME) to 
resume the Cl task and 


S 


stop. 


CITASK, 

IDS 








3.3.2.14 Extract NDB Module (EXTNDB) 

The function of this module is to extract the Node 
Description Blocks and write them to the TRAP file. The Resource 
Activity Blocks associated with each NDB are also extracted 
and written to the TRAP file. 

Calling sequence: 

Call EXTNDB (NPAREN , IPT, I ERR) 

Modules which call EXTNDB: 

EXTFIL 

Modules called by EXTNDB: 

DMREQ 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



EXTNDB 



CBREQU 

1 

Get the total number of 
RAB's so that the pointer 
to the first EDB can be 
calculated. 

2 

NUMRAB, 

CBRETC 

CBREQU 

2 

Get the universe of all 
NDB's. 

3 

CBUSIZ 

IPT, NUMRAB, 
CBUSIZ 

3 

Calculate the pointer to 
the first EDB and save 
the pointer to the 
beginning to this NDB. 

4 

IPT, ISAV 

IPT 

4 

Write the pointer to the 
first EDB to the TRAP 
file. 

5 


CBUSIZ 

5 

If no NDB's exist go to 
step 31; else continue. 

31/6 


CBREQU 

6 

Ready the universe of 
NDB's for access. 

7 

CBRETC 

CBRETC 

7 

If an error occurred, go t 
step 31; else continue. 

i 31/8 


CBREQU 

8 

Get the first/next entry 
from the NDB universe 
l j . 

9 

CBRETC 

CBRETC 

9 

It an error occurred or 
no more NDR's exist, go to 
step 31; else continue. 

31/10 


CBREQU, 

CBANUM, 

CBENUM 

10 

Get the node ID for this 
entry. 

11 

CBTXT , CBLNG, 
CBRETC, IDLEN, 
ID 

CBRETC 

11 

If an error occurred, go 
to step 31; else continue. 

31/12 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




EXTNDB - CONTINUED 



CBTXT, CBLNG 

12 

Get a universe of all 
RAB's associated with this 
node. 

13 

CBRETC, CBUSIZ 
NUMRAB 

CBRETC , 
CBUSIZ 

13 

If no RAB's exist 
reposition the NDB universt 
file to point to the 
current entry; else 
continue. 

14 


NUMRAB 

14 

Calculate a pointer to the 
next NDB in the TRAP file. 

15 

NXTNDB, ISAV 

ID, IDLEN, 
NXTNDB 

15 

Write the pointer and the 
node ID to the file. 

16 


C3REQU 

CBANUM 

16 

Get the node description 
and shift factor and 
write them to the TRAP 
file. 

17 

CBTXT, CBLNG, 
CBRETC 

CBREQU, 

CBANUM 

17 

Get the node duration. 

18 

I HOLD, LEN 
CBRETC 

CBRETC 

18 

If an error occurred in 
step 16 or 17, go to step 
31; else continue. 

31/19 


CBREQU, 

CBANUM 

19 

Get the node flags. 

20 

CBRETC 

CBRETC 

20 

If an error occurred go to 
step 31; else continue. 

31/21 


IDLEN, ID, 
RVAL, CBTXT, 
CBLNG 

21 

Write the node flags and 
node duration to the TRAP 
file. 

22 


NUMRAB 

22 

Write the number of RAB's 
for this NDB to the TRAP 
file. 

23 


NUMRAB 

23 

If the number of RAB's is 
zero go to step 8; else 

8/24 
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INPUT 

STEP 

PROCESSING 

STEP 

OUTPUT 



EXTNDB - CONTINUED 



CBREQU 

24 

Get the first/next entry 
from the RAB universe file 

25 

CBRETC 

CBRETC 

25 

If an error occurred, go t< 
step 31; else continue. 

i 31/26 


CBRETC 

26 

If no more RAB's exist for 
this NDB go *o step 30; 
else continue. 

30/27 


CDREQU , 
CBANUM 

27 

Get the RAB ID, quantity 
and code and write them to 
the TRAP file. 

28 

CBRETC, CBTXT 
CBLNG 

CBRETC 

28 

If an error occurred go to 
step 31; else continue. 

31/30 



29 

Go to step 24. 

24 



30 

Go to step 8. 

8 



31 

Set the return code and 
return. 

R 

IERR 


Hr ' 










3.3.2.15 Extract the PDB Module (EXTPDB) 

The function of this module is to extract the project 
description information and write it to the TRAP file. 

Calling sequence: 

Call EXTPDB (NLEV, IPT, IERR) 

Modules which call EXTPDB: 

EXTFIL 

Modules called by EXTPDB: 

DMREQ 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 




EXTPDB 


IPT 

1 

Adjust the record pointer 
for the TRAP file to 
point to the first RUB. 

2 

IFPDB, CBTXT 
CBLNG 

2 

Get the universe of PDB's 
from the OMRS database. 

3 

CBRETC 

3 

If an error occurred 
go to step 14; else 
continue. 

14/4 

CBREQU , CBUNIV 

4 

i 

Ready the universe of 
PDB's for access. 

5 

CBRETC 

6 

If an error occurred 
go to 14; else continue. 

14/7 

CBREQU 

7 

Get the first entry 
from the universe file. 

8 

CBRETC 

8 

If an error occurred 
go :o step 14; else 
continue. 

14/9 

CBANUM, CBTXT 

9 

Get the project title, 
network ID and network 
description from the 
database and write them 
to the- TRAP file. 

10 

NLEV 

10 

Write the network level 
to the TRAP file. 

11 

CBANUM, CBTXT 

11 

Get the network start 
time from the database 
and write it to the TRAP 
file. 

12 

CBANUM, CBTXT 

12 

Get the time units 
from the database and 
write it to the TRAP file 

13 

• 


i 

5 

* 


IPT 


CBRETC 


CBRETC 


CBRETC 


CBRETC 


CBRETC 


CBRETC 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CBANUM , C3TXT 


EXTPDB (continued) 

13 Get the network duration 14 

from the database and 

write it to the TRAP 
file. 

14 Release and delete the R 

universe file, 


CBRETC 
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3.3.2.16 Extract RDB Module (EXTRDB) 

The function of this module is to extract the 
Resource Description data from the database and write 
it to the TRAP file. 

Calling sequence: 

Call EXTRDB ( IPT, I ERR) 

Modules which call EXTRDB: 

EXTFIL 

Modules called by EXTRDB: 

DMREQ 
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INPUT 


STEP 


PROCESSING 


STEP 


OUTPUT 


CBRETC, IFRDB 
IPT, CBUSIZ 

IPT, CBUSIZ 

CBUSIZ 

CBREQU 

CBREQU 

CBRETC 

CBANUM, 

CBENUM 


EXTRDB 

1 Create a universe which 2 CBUSIZ 

contains all of the ROB's. 

2 Update the TRAP file 3 IPT 

pointer to point to the 

first record with node 
data. 

3 Write the pointer and 4 

number of RDB's to the 

TRAP file. 

4 If the universe is empty, 11/5 

go to step 11; else 

continue . 

5 Ready the universe of 6 CBRETC 

RDB's for access. 

6 If an error occurred, go 11/6 

to step 11; else continue. 

7 Get the first/next entry 8 CBRETC 

from the universe file. 

8 If an error occurred or 11/8 

all entries have been 
processed, go to step 11; 

else continue. 

9 Get the attribute values 10 CBTXT, CBLNG, 

for the resource ID, IFLAGS, IFLGl , 

description, flags, IFLG2 , IFLG3 , 

constraint level, initial LEN 

quantity and function and 

write them to the TRAP 
file. 

10 Go to step 7. 7 

11 Set the return code and R IERR 

return . 
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3.3.2.17 Submit TRAP File Module (SUBFIL) 

The function of this module is to submit the TRAP 
file across the PDP/SIGMA interface. 

Calling sequence: 

Call SUBFIL 

Modules which call SUBFIL: 

EXTMN 

Modules called by SUBFIL: 

None 
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INPUT 


STEP 


processing 


STEP 


OUTPUT 



SUBFIL 

Open the TRAP file to be 
transferred. 


2 If an error occurred set 
the return code and go 
to step 4; else continue. 


3 Transmit the file to the 
SIGMA computer. 


CITASK, IERR 



Call a module to send the 
return code to the Cl 
task . 


4/3 

4 

R 


IERR 
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3.4 


ITIP Data Bate Characteristics 


Intergraph's Data Management and Retrieval System (DMRS) is 
used to store the data which is associated with the network 
flow diagrams generated by IGDS. General information about 
DMRS can be found by referencing the DMRf documents listed in 
section 2 of this document. This section will discuss the 
specific structure of the data base used to support the ITIP. 
Figure 3.4-1 defines the structure of the data base. This 
figure shows a subset of the statements that would be necessary 
to generate the data base using the Data Description Language 
(DDL) compiler. The following subsections will discuss the 
five entities which are shown in Figure 3.4-1. 
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1. PD3 


2. RDB 


3. ND3 


4. EDB 


5. RAB 


•p - 

0 

DF - ' PDB . ENT ' 

. 1 

P TITLE 

F-AN(30) 

.2 

N”ID 

F-AN ( 4 ) 

.3 

N~TITLE 

F-AN{30) 

.4 

N~LEVEL 

F-I(16) 

.5 

S~TIME 

F-F 

. 6 

U TIME 

F-AN ( 8 ) 

.7 

N“DURATION 

F-F 

.8 

EX_INDEX 

F-K9999) 

P - 

1 

DF - 'RDB. ENT* 

. 1 

R ID 

F-AN (2) 

.2 

R DESC 

F-AN (24) 

.3 

R FLAGS 

F-I (10) 

.4 

R~ CONST 

F-F 

.5 

R INIT QTY 

F-F 

.6 

R_FUNC 

F-I ( 10 ) 

P ■ 

1 

DF - ' NDB.ENT' 

.1 

ND ID 

F-I (9999) 

.2 

ND DESC 

F-AN (24) 

.3 

ND — SHF FAC 

F-I (10) 

.4 

ND FLAGS 

F-I (10) 

.5 

ND DUR 

F-F 

.6 

ND NUM RABS 

F-I (12) 

.7 

ND LEV 

F-I (8) 

.8 

ND PAREN 

F-I (9999) 

.9 

ND XUR 

F-I (2147000000) 

.10 

ND_YUR 

F-I (2147000000) 

P = 

1 

DF » 'EDB. ENT' 

. 1 

E ID 

F-AN ( 4 ) 

.2 

E PRED 

F-I (9999) 

. 3 

E SUCC 

F-I (9999) 

.4 

E_PAREN 

F-I (9999) 

P = 

3 

DF = 'RAB. ENT' 

.1 

RA ID 

F-AN (2) 

.2 

RA CODE 

F-AN ( 1 ) 

.3 

RA QTY 

F-F 

.4 

RA PAREN 

F-I (9999) 

.5 

EX PAREN 

F-I (9999) 


OCC - 2 

; PROJECT TITLE 
t NETWORK ID 
; NETWORK TITLE 
; NETWORK LEVEL 
; NETWORK START TIME 
; TIME UNITS 
; NETWORK DURATION 
; NODE EXPANSION 
INDEX 

OCC - 50 

; RESOURCE ID 
; RESOURCE DESCRIPTION 
; RESOURCE FLAGS 
; RESOURCE CONSTRAINTS 
. RESOURCE INITIAL CU&NTI' 
; FUNCTION INDEX 

OCC - 2400 

; NODE ID 

; NODE DESCRIPTION 
? NODE SHIFT FACTOR 
: FLAGS 

; NODE DURATION 
; NO. OF RABS FOR NODE 
; NODE LEVEL 
; NODES PARENT 
; NODE CENTER XUR 
; NODE CENTER YUR 

OCC » 1000 

; EDGE ID 

; EDGE PREDESESSOR 
; EDGE SUCCESSOR 
; PAREN OF THIS EXPANSION 

OCC = 1000 

; RESOURCE ACTIVITY B ID 
; RESOURCE ACTIVITY CODE 
; QUANTITY 

; NODE WHICH OWNS PAD 
; EXPANSION PARENT 
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3.4.1 Project Description Block (PDB) 

The PDB entity has eight attributes. The first is 
labeled P_TITLE and is the project title. The project 
title is an ASCII string whose maximum length can be thirty 
characters. The second attribute is labeled N_ID and is the 
network identification. The network identification is an 
ASCII string of not more than four characters. The third 
attribute is labeled N TITLE and is the network title The 
network title is an ASCII string of thirty characters or 
less. The fourth attribute is labeled N LEVEL and is the 
network level. The network level is an Integer with a value 
from zero to sixteen. The fifth attribute is labeled S_TIME 
and is the network start time. The start time is a floating 
point value. The sixth attribute is labeled U TIME and is 
the units of time. The units of time is an AS?II string of 
eight characters or less. The seventh attribute is labeled 
N_DURATION and is the network duration. The network duration is 
a floating point value. The eighth attribute is labeled 
EX_INDEX and is the expansion index. This index points to 
the next design space to be allocated for a node expansion. 

The expansion index is an integer in the range of 0 to 9999. 
These eight attributes collectively define the PDB. Attribute 
eight is used internally to support ITIP processing. The 
other attributes are used when a TRAP file is created. 


3.4.2 Resource Description Block (RDB) 

The RDB entity has six attributes. The first attribute 
is the resource identification and is labeled R ID. It is 
an ASCII string of one or two characters. The~second 
attribute is the resource description and is labeled R__DESC. 

It is also an ASCII string but the length must be twenty-four 
or fewer characters. The third attribute is the resource 
flags variable. This is a composite flag variable represented 
by an integer in the data Lase. Three bits in the word are 
used and are counted from the left. They are, from the left, 
the sum check flag, value type flag and the constrained 
resource flag. These flags are defined in the TRAP 
documentation. The fourth attribute is the resource constraint 
level and is labeled R_CONST. It is a floating point value. 

The fifth attribute is the initial quantity of the resource 
and is labeled R_INIT_QTY . It is also a floating point value. 
The sixth attribute is the function index and is labeled R_FUNC. 
It is an integer value from zero to ten. These six attributes 
define each resource. The above information is stored in the 
data base for each resource defined by the user. 
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3.4.3 Node Description Block (NDB) 

The NDB entity is defined by ten attributes. The first 
five are extracted for the TRAP file. The last five are used 
internally by the ITIP system. The first attribute is the 
node identification tnd is labeled ND ID. It is an integer 
in the range of 0 to 9999. This is tFTe unique node identification. 
The second attribute is the node description and is labeled 
ND_DESC . The node description is an ASCII string of 24 or 
fewer characters. The third attribute is the shift factor and 
is labeled ND_SHF_FAC. The shift factor should be an integer 
and may assume a value of one, two or three. The fourth attribute 
is the node discrete f’ags and is labeled ND FLAGS. The flags 
variable is as defined in the TRAP documentation. This is 
a composite flag variable and is an integer. The fifth attribute 
is the node duration and is labeled ND_DUR. The node duration 
is a floating point value. The sixth attribute is the number 
of Resource Activity Blocks associated with the node and is 
labeled ND_NUM_RABS. It is an integer value in the range of 
zero to twelve. This attribute is not used and will have a 
value of -128 for each node defined. The seventh attribute is 
the node level and is labeled ND_LEV. The node level is an 
integer value and indicates the network level of the node. 

The eighth attribute is the node parent or owner and is 
labeled ND_PAREN . This is also an integer value which contains 
the ID of the node that is being expanded. The ninth and tenth 
attributes labeled ND_XUR and ND__YUR are the node X and Y 
coordinates. These coordinates are in IGDS units. These ten 
attributes define a node and up to 9999 nodes can be defined 
in the NDB. 
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3.4.4 Edge Description Block (EDB) 

The EDB entity has four attributes. The first attribute 
is the edge identification and is labeled E_ID. The edge ID 
is an ASCII string of four or less characters. The edge ID 
is not used sirce attributes two and three uniquely identify 
the edge. The second attribute is the predecessor node for 
the edge and is labeled E__PRED . The third attribute is the 
successor node for the edge and is labeled E SUCC. The second 
and third attributes are integer values in tfie range of 0 to 
9999. They are the node identifications for the nodes involved. 
The fourth attribute is the node identification for the node 
which owns the expansion that this edge is a part of and is 
labeled E_PAREN . This is also an integer in the range of 
0 to 9999. The fourth attribute is used only by the ITIP 
system and is not extracted for the TRAP file. These four 
attributes define an edge and up to 4096 edges can be defined 
in the EDB. 
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3.4.5 Resource Activity Block (RAB) 

The RAB also called a Resource Activity Descriptor (RAD) 
is defined by five attributes. The first attribute is the resource 
identification code and is labeled RA ID. This is a one or two 
character ASCII string. The second attribute is the resource 
activity code and is labeled RAjCODE . This is a single ASCII 
character and is defined in the “TRAP documentation. The third 
attribute is the resource activity quantity and is labeled 
RA QTY . The resource activity quantity is a floating point 
value. The fourth attribute is the RAB parent and is labeled 
RA_PAREN. This is an integer in the range of 0 to 9999 and 
identifies the node with which the RAB is associated. The 
fourth attribute is the expansion owner or parent and is 
labeled EX PAREN. This is an integer value in the range 
of 0 to 9959 . This value identifies the node whose expansion 
the RAB is a part of. The first three attributes are 
extracted for the TRAP file while the last two are used internally 
by ITIP. 
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APPENDIX A 

TASK BUILD COMMAND FILES 
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Appendix A describes the PDP command files used by the 
PDP Task Builder to produce the two FORTRAN tasks which support 
ITIP operation. The command file listed below is used to 
build the IT1P.TSK task. 

ITIP, ITIP/-SP-ITIP, NID, RDAST, PETPDB , STOPDB, DEFPDB 
DEFRDB , MODRDB , DEFRAB, MODRAB 
QSO: [ 15 , 100 JUTILITIES/LB 

QS2: [ 50 , 2 ] ASIS/LB 


/ 

WNDWS=1 

VSECT“ASREGN : 160000 

UNITS*6 

ASG=TT0 : 6 

ASG-NL :2 : 3 : 4 

GBLDEF»RSX11$:1 

// 

> 

This command file requires two libraries. The IGDS utilities 
library is named UTILITIES. OLB and resides in account QSO : [ 15 , 100 ] . 
The Attribute Services interface library is named ASIS.OLB 
and resides in account QS2:[50,2]. 

The command file listed below is used to build the 
IEXT.TSK task. 

IEXT=EXTMN , EXTFIL, EXTPDB , EXTRDB , EXTNDB, EXTEDB, SUBFIL 
QS: [ 14 , 35]DMRS/LB:FORAST 
QS: [ 14 , 35JDMRS/LB 


/ 

UNITS=6 
ASG=TT0 : 6 
ASG=SY : 4 

// 

> 

This command file requires the DMRS library, which is named 
DMRS.OLB and resides in account QSO: [14,35]. 
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APPENDIX B 

ITIP SOFTWARE DELIVERY MEDIUM 
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Appendix B describes the ITIP software delivery medium. 

The ITIP software resides in the QS2:[50,2] account on the 
PDP-11/70 in Building 4487, MSFC. The official delivery of 
this software is on z magnetic tape which can be used to 
recreate the QS2:[50,2] account. Table B.l lists the files 
which reside on the delivery tape. 

The files in Table B.l are identified by the three-character 
file extension. The files with extensions of UCM, FTN and MAC 
are source modules which are described in Section 3 of the 
document. The COM files define the intermodule COMMON variables 
used by the FORTRAN source modules. The files with extensions 
of CMD and OLB identify the command and library files, respectively, 
which are used to build the FORTRAN tasks. The TSK files 
are the FORTRAN task files and the CEL file is the cell 
library. The DDL file is the Data Definition Language input 
file used to build the ITIP DMRS data base. The SEED.DGN 
file defines the default IGDS design file conditions. 




